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This publication contains specifications 
for the IBM System/360 Operating System 
Assembler Language (Levels E and F) . 

The assembler language is a symbolic 
programming language used to write programs 
for the IBM System/3 60. The language pro- 
vides a convenient means for representing 
the machine instructions and related data 
necessary to program the IBM System/360. 
The IBM Systeiii/3 60 Operating System Assem- 
bler Program processes the language and 
provides auxiliary functions useful in the 
preparation and documentation of a program, 
and includes facilities for processing the 
assembler macro language. 

Part I of this publication describes the 
assembler language. 

Part II of this publication describes an 
extension of the assembler language — the 
macro language -- used to define macro 
instructions . 
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PREFACE 



This publication is a reference manual 
for the programmer using the assembler 
language and its features. 

Part I of this publication presents 
information common to all parts of the 
language followed by specific information 
concerning the symbolic machine instruction 
codes and the assembler program functions 
provided for the programmer's use. Part II 
contains a description of the macro lan- 
guage and procedures for its use. 

Appendixes A through J follow Part II. 
Appendixes A through F are associated with 
Parts I and II and present such items as a 
summary chart for constants, instruction 
listings, character set representations, 
and other aids to programming. Appendix G 
contains macro language summary charts, and 
Appendix H is a sample program. Appendix I 
is a features comparison chart of 
System/360 assemblers. Appendix J includes 
samples of macro definitions. 

Knowledge of IBM System/360 machine 
operations, p^irticularly storage address- 
ing, data formats, and machine instruction 
formats and functions, is prerequisite to 
using this publication, as is experience 
with programming concepts and techniques or 
completion of basic courses of instruction 
in these areas. IBM System/360 machine 



operations are discussed in the publication 
IBM System/360 Principles of Operation , 
Order No. GA22-6821. The IBM System/370 
machine operations are discussed in the 
publication IBM System/370 Principles of 
Operation , Order No. GA22-7000. Information 
on program assembling, linkage editing, 
executing, Interpreting listings, and 
assembler programming considerations is 
provided in OS Assembler (F) Programmer's 
Guide, Order No. GC26-3756. 



The following publications are referred to 
in this publication: 

OS Introduction , Order No. GC28-6534 

OS Utilities , Order No. GC28-6586 

OS Loader and Linkage Editor , 
Order No. GC28-6538 

OS Supervisor Services and Macro 
Instructions, Order No, GC28-6646 

OS Data Management Macro Instructions , 
Order No. GC26-3794 

OS Data Management Services Guide , 
Order No. GC26-3746 
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SUMMARY OF AMENDMENTS 
FOR GC28-6514-8 

OS. RELEASE 21 



USE OF DSECT SYMBOLS IN ADCONS 

The use of DSECT symbols as absolute 
expressions in adcons has been rewritten 
for clarification. 



HEXADECIMAL CONSTANTS AND SYNTAX RULES 

Clarification of the syntax restriction 
on the number of hexadecimal digits allow- 
able per explicit hexadecimal constant 
specification has been added. 



MACHINE-INSTRUCTION ON MNEMONIC 
OPERATION CODES 

Erroneous instruction names, condition 
code settings, and operand formats contained 
in Appendix D have been corrected. 



&SYSLIST 

An explanation of &SYSLIST(0) has been 
added for completeness. 



COMMENTS ON ASSEMBLER INSTRUCTIONS 

A note has been added explaining why 
certain assembler instructions (e.g.,LTORG) 
are not flagged when an "operand" is 
present. 

POSITIONAL PARAMETERS 



A note has been added explaining that 
positional parameters cannot be changed 
to keywords by substitution. 



MACRO SEQUENCE SYMBOLS 

An explanatory note has been added dis- 
tinguishing the "name field" of a macro 
from the name field parameter. 



CHARACTER CODE GRAPHICS 

The EBCDIC printer graphics for the IBM 
System/360 8-bit code have been added to 
Appendix A. 



TITL E C HANGES 

Cross-references to OS publications 
have been changed to reflect their new 
titles. 



PART I — THE ASSEMBLER LANGUAGE 



SECTION 1: INTRODUCTION 



SECTION 2: GENERAL INFORMATION 



SECTION 3: ADDRESSING AND PROGRAM SECTIONING AND LINKING 



SECTION H: MACHINE INSTRUCTIONS 



SECTION 5: ASSEMBLER INSTRUCTIONS 



SECTION 1: INTRODUCTION 



Computer programs may be expressed in 
machine language, i.e., language directly 
interpreted by the computer, or in a sym- 
bolic language, which is much more meaning- 
ful to the programmer. The symbolic lan- 
guage, however, must be translated into 
machine language before the computer can 
execute the program. This function is 
accomplished by a processing program. 



THE ASSEMBLER LANGUAGE 



The basis of the assembler language is a 
collection of mnemonic symbols which rep- 
resent: 



1. 



System/360 machine-language 
codes. 



operation 



Of the various symbolic programming lan- 
guages, assembler languages are closest to 
machine language in form and content. The 
assembler language discussed in this manual 
is a symbolic programming language for the 
IBM System/3 60. It enables the programmer 
to use all IBM System/360 machine func- 
tions, as if he were coding in System/360 
machine language. 



The assembler program that processes the 
language translates symbolic instructions 
into machine-language instructions, assigns 
storage locations., and performs auxiliary 
functions necessary to produce an executa- 
ble machine-language program. 



2. Operations (auxiliary functions) to be 
performed by the assembler program. 

The language is augmented by other sym- 
bols, supplied by the programmer, and used 
to represent storage addresses or data. 
Symbols are easier to remember and code 
than their machine- language equivalents. 
Use of symbols greatly reduces programming 
effort and error. 

The programmer may also create a type of 
instruction called a macro instruction. A 
mnemonic symbol, supplied by the program- 
mer, serves as the operation code of the 
instruction. 



Machine Operation Codes 



Compatibility 



System/360 Operating System assemblers 
process source programs written in the 
Basic Programming Support/360 basic assem- 
bler language, the IBM 7090/7094 Support 
Package for IBM System/360 assembler lan- 
guage, the Basic Programming Support Ass- 
embler (8K Tape) language, the Basic Oper- 
ating System Assembler (8K Disk) language, 
and the Disk and Tape Systems Assembler 
language, with the following exceptions: 



1. The XFR assembler instruction is con- 
sidered an invalid mnemonic operation 
code by Operating System/360 assem- 
blers. 



The assembler language provides mnemonic 
machine-instruction operation codes for all 
machine instructions in the IBM Systera/360 
Universal Instruction Set and extended mne- 
monic operation codes for the conditional 
branch instruction. 



Assembler Operation Codes 



The assembler language also contains 
mnemonic assembler-instruction operation 
codes, used to specify auxiliary functions 
to be performed by the assembler. These 
are instructions to the assembler program 
itself and, with a few exceptions, result 
in the generation of no machine-language 
code by the assembler program. 



2. The assignment, size, and ordering of 
literal pools may differ among the 
assemblers. 



Macro Instructions 



Differences in the macro language for 
System/360 assemblers are described in Sec- 
tion 10 of this publication. 



The assembler language enables the pro- 
grammer to define and use macro 
instructions . 



Section 1: Introduction 



Macro instructions are represented by an 
operation code which stands for a sequence 
of machine and/or assembler instructions. 
Macro instructions used in preparing an 
assembler language source program fall into 
two categories: system macro instructions, 
provided by IBM, which relate the object 
program to components of the operating 
system; and macro instructions created by 
the programmer specifically for use in the 
program at hand, or for incorporation in a 
library, available for future use. 

Programmer- created macro instructions 
are used to simplify the writing of a 
program and to ensure that a standard 
sequence of instructions is used to 
accomplish a desired function. For 
instance, the logic of a program may 
require the same instruction sequence to be 
executed again and again. Rather than code 
this entire sequence each time it is need- 
ed, the programmer creates a macro 
instruction to represent the sequence and 
then, each time the sequence is needed, the 
programmer simply codes the macro 
instruction statement. During assembly, 
the sequence of instructions represented by 
the macro instruction is inserted in the 
object program. 

Part II of this publication discusses 
the language and procedures for defining 
and using macro instructions. 



THE ASSEMBLER PROGRAM 



The assembler program, also referred to 
as the "assembler," processes the source 
statements written in the assembler 
language. 



Basic Functions 



Processing involves the translation of 
source statements into machine language, 
the assignment of storage locations to 
instructions and other elements of the 
program, and the performance of the auxil- 
iary assembler functions designated by the 
programmer. The output of the assembler 
program is the object program, a machine- 
language translation of the source program. 
The assembler furnishes a printed listing 
of the source statements and object program 
statements and additional information 
useful to the programmer in analyzing his 
program., such as error Indications. The 
object program is in the format required by 
the linkage editor component of Operating 
Systeni/360. (See the linkage editor publi- 
cation. ) 



The amount of main storage allocated to 
the assembler for use during processing 
determines the maximum number of certain 
language elements that may be present in 
the source program. 



PROGRAMMER AIDS 



The assembler provides auxiliary func- 
tions that assist the programmer in check- 
ing and documenting programs, in controll- 
ing address assignment, in segmenting a 
program, in data and symbol definition, in 
generating macro instructions, and in con- 
trolling the assembler itself. Mnemonic 
operation codes for these functions are 
provided in the language. 



Variety in Data Representation ; Decimal, 
binary, hexadecimal, or character represen- 
tation of machine- language binary values 
may be employed by the programmer in writ- 
ing source statements. The programmer se- 
lects the representation best suited to his 
purpose. 



Base Register Address Calculation; As dis- 
cussed in IBM System/360; Principles of 
Operation , the System/360 addressing scheme 
requires the designation of a base register 
(containing a base address value) and a 
displacement value in specifying a storage 
location. The assembler assumes the cleri- 
cal burden of calculating storage addresses 
in these terms for the symbolic addresses 
used by the programmer. The programmer 
retains control of base register usage and 
the values entered therein. 



Relocatability ; The object programs pro- 
duced by the assembler are in a format 
enabling relocation from the originally 
assigned storage area to any other suitable 
area . 



Sectioning and Linking; The assembler lan- 
guage and program provide facilities for 
partitioning an assembly into one or more 
parts called control sections. Control 
sections may be added or deleted when 
loading the object program. Because con- 
trol sections do not have to be loaded 
contiguously in storage, a sectioned pro- 
gram may be loaded and executed even though 
a continuous block of storage large enough 
to accommodate the entire program may not 
be available. 

The assembler allows symbols to be 
defined in one assembly and referred to in 
another, thus effecting a link between 



separately assembled programs. This per- 
mits reference to data and transfer of 
control between programs. A discussion of 
sectioning and linking is contained in 
Section 3 under the heading, "Program Sec- 
tioning and Linking." 



Program Listings; A listing of the source 
program statements and the resulting object 
program statements may be produced by the 
assembler for each source program it assem- 
bles. The programmer can partly control 
the form and content of the listing. 



Error Indications; As a source program is 
assembled, it is analyzed for actual or 
potential errors in the use of the assem- 
bler language. Detected errors are indi- 
cated in the program listing. 



OPERATING SYSTEM RELATIONSHIPS 



The assembler is a component of the IBM 
System/360 Operating System and, as such, 
functions under control of the operating 
system. The operating system provides the 
assembler with input/output, library, and 
other services needed in assembling a 
source program. In a like manner, the 
object program produced by the assembler 
will normally operate under control of the 
operating system and depend on it for 
input/output and other services. In writ- 
ing the source program, the programmer must 
include statements requesting the desired 
functions from the operating system. These 
statements are discussed in the control 
program services publication. The 
OS Introduction publication provides further 
information on operating system relationships 
Input/output considerations are discussed in 
the data management publication. 



Section 1: Introduction 



SECTION 2: GENERAL INFORMATION 



This section presents information about 
assembler language coding conventions and 
assembler source statement structure 
addressing. 



ASPEMBLFI^ LANGUAGE CODING CONVENTIONS 



is not part of a 
following the 
Foriaat. " 



statement and is discussed 
subsection "Statement 



The entries (i.e. , coding) composing a 
statement occupy columns l-7i of a line 
and, if needed, columns 16-71 of one or two 
successive continuation lines. 



This subsection discusses the general 
coding conventions associated with use of 
the assen:bler language. 

Coding Form 

A source program is a sequence of source 
statements that are punched into cards. The 
standard card form, IBM 6509 (shown in Figure 
2-2) , can be used for punching source state- 
ments. These statements may be written on 
the standard coding form, GX28-6509 (shown 
in Figure 2-1) , provided by IBM. One line 
of coding on the form is punched into one 
card. The vertical columns on the form 
correspond to card columns. Space is provided 
on the form for program identification and 
instructions to keypunch operators. 



The body of the form (Figure 2-1) is 
composed of two fields: the statement 
field, columns 1-71, and the 
identification-sequence field, columns 
73-8 0. The identification-sequence field 



Continuation Lines 

When it is necessary to continue a 
statement on another line, the following 
rules apply. 

1. Write the statement up through column 71. 

2. Enter a continuation character (not blank 
and not part of the coding) in column 72 
of the line. 

3. Continue the statement in column 16 of the 
next line, leaving columns 1 through 15 
blank. 

4. If the statement is not finished before 
column 71 of the second line, enter a 
continuation character in column 72, and 
continue in column 16 of the following line. 

5. The statement has to be finished before 
column 71 of the third line, because the 
maximum number of continuation lines is two, 

6. Macro instruction can be coded on as many 
lines as are needed. 

These rules assume that normal source 
statement boundaries are used (see"State- 
ment Boundaries" below) . 
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Figure 2-1. Coding Form 
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statement Boundaries 

Source statements are normally contained 
in columns 1-71 of statem.ent lines and 
columns 16-71 of any continuation lines. 
Therefore, columns 1, 71, and 16 are 
referred to as the "begin," "end," and 
"continue" columns, respectively. (This 
convention can be altered by use of the 
Input Format Control (ICTL) assembler 
instruction discussed later in this publi- 
cation. The continuation character, if 
used, always immediately follows the "end" 
column. 



Statement Format 

Statements may consist of one to four 
entries in the statement field. They are, 
from left to right: a name entry, an 
operation entry, an operand entry, and a 
comments entry. These entries musi be 
separated by one or more blanks, and must 
be written in the order stated. 

The coding form (Figure 2-1) is ruled to 
provide an 8~character name field, a 
5-character operation field, and a 
56-character operand and/or comments field. 

If desired, the programmer can disregard 
these boundaries and write the name, 
operation, operand, and comment entries in 
other positions, subject to the follov/ing 
rules : 

1. The entries must not extend beyond 
statement boundaries within a line 
(either the conventional boundaries 
if no ICTL statement is given, or as 
designated by the programmer via the 
ICTL instruction) . 

2. The entries must be in proper 
sequence, as stated previously. 



The entries must be separated by 
or more blanks. 



one 



'i . If used, a name entry must be written 
starting in the begin column. 



5. The name and operation entries must be 
completed in the first line of the 
statement, including at least one 
blank following the operation entry. 

A description of the name, operation, 
operand, and comments entries follows: 

Name Entr y : The name entry is a symbol 
created by the programmer to identify a 
statement. A name entry is usually option- 
al. The symbol must consist of eight 
characters or less, and be entered with the 
first character appearing in the begin 
column. The first character must be 
alphabetic. If the begin column is blank, 
the assembler program assumes no name has 
been entered. No blanks can appear in 
the symbol . 

Ope ration Ent ry: The operation entry is 
the mnemonic operation code specifying the 
machine operation, assembler, or macro- 
instruction operation desired. An 
operation entry is mandatory and cannot 
appear in a continuation line. It must 
start at least one position to the right of 
the begin column. Valid mnemonic operation 
codes for machine and assembler operations 
are contained in Appendixes D and E of this 
publication. Valid operation codes consist 
of five characters or fewer for machine or 
assembler-instruction operation codes, and 
eight characters or fewer for macro- 
instruction operation codes. No blanks can 
appear within the operation entry. 

Operand Entries : Operand entries identify 
and describe data to be acted upon by the 
instruction, by indicating such things as 
storage locations, masks, storage-area 
lengths, or types of data. 

Depending on the needs of the instruc- 
tion, one or more or no operands can be 
written. Operands are required for all 
machine instructions, but many assembler 
instructions require no operand. 

Operands must be separated by commas, 
and no blanks can intervene between oper- 
ands and the commas that separate them. 
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Figure 2-2. Punched Card Form 



The first blank normally indicates the end 
of the operand field. 

The operands cannot contain embedded 
blanks, except as follows: 

If character representation is 
used to specify a constant, a 
literal, or immediate data in an 
operand, the character string can 
contain blanks, e.g., C'A D' . 



compared. The comment entry reminds the 
programmer that he is comparing "new sum" 
to "old" with this instruction. 



r T T T 

I Name | Operation [Operand | 

|. 1__ 1 ^ 

JCOMP JCR I 5,6 NEW SUM TO OLD 1 

L X ^ X J 



Comment Entries ; Comments are descriptive 
items of information about the program that 
are shown on the program listing. All 256 
valid characters (see Character Set in this 
section) , including blanks can be used in 
writing a comment. The entry can follow 
the operand entry and must be separated 
from it by a blank; each line of comment 
entries cannot extend beyond the end 
column (column 71) . 



An entire statement field can be used 
for a comment by placing an asterisk in the 
begin column. Extensive comment entries 
can be written by using a series of lines 
with an asterisk in the begin column of 
each line or by using continuation lines. 
Comment entries cannot fall between a 
statement and its continuation line. 

In statements where an optional operand 
entry is omitted but a comment entry is 
desired, the absence of the operand entry 
must be indicated by a comma preceded and 
followed by one or more blanks, as follows: 

r T T -1 

I Name | Operation | Operand | 

^ 1 1 ^ 

I I END I, COMMENT j 

L ,X X J 

For instructions that cannot contain an 
operand entry, this comma is not needed. 

Note : Macro prototype statements without 
operands will not tolerate comments, even 
if a comma is coded as shown above. 

For information on rules for the operand 
field of different assembler instructions, 
refer to the table in Appendix E. 

Statement Example; The following example 
illustrates the use of name, operation, 
operand, and comment entries. A compare 
instruction has been named by the symbol 
COMP; the operation entry (CR) is the 
mnemonic operation code for a register-to- 
register compare operation, and the two 
operands (5,6) designate the two general 
registers whose contents are to be 



Identification-Sequence Field 



The identification-sequence field of the 
coding form. (columns 73-80) is used to 
enter program identification and/or state- 
ment sequence characters. The entry is 
optional. If the field, or a portion of 
it, is used for prograni identification, the 
identification is punched in the source 
cards and reproduced in the printed listing 
of the source program. 



To aid in keeping source statements in 
order, the programmer can number the cards 
in this field. These characters are 
punched into their respective cards, and 
during assembly the programmer may request 
the assembler to verify this sequence by 
use of the Input Sequence Checking (ISEQ) 
assembler instruction- This instruction is 
discussed in Section 5, under Program 
Control Instructions. 



Summary of Statement Format 



The entries in a statement must always 
be separated by at least one blank and must 
be in the following order: name, operation, 
operand(s), comment(s). 



Every statement requires an operation 
entry. Name and comment entries are 
optional. Operand entries are required for 
all machine instructions and most assembler 
instructions. 



The name and operation entries must be 
completed in the first statement line, 
including at least one blank following the 
operation entry. 

The name and operation entries must not 
contain blanks. Operand entries must not 
have blanks preceding or following the 
commas that separate them. 
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A name entry must always start in the 
begin column. 

If the column after the end column is 
blank, the next line must start a new 
statement. If the column after the end 

column is not blank, the following line 
is treated as a continuation line. 

All entries must be contained within the 
designated begin, end, and continue column 
boundaries. 



Character Set 



Source statements are written using the 
following characters: 



Letters A through Z, and $, #, a 



Digits 



through 9 



Sp ecial 
Characters + - 



( ) 



/ g blank 



These characters are 
card-punch combinations 
configurations listed 
addition, any of the 256 
may be designated anywhe 
may appear between pai 
comments , and in macro 
ands. 



represented by the 

and internal bit 
in A.ppendix A. In 

punch combinations 
re that characters 
red apostrophes, in 

instruction oper- 



An operand entry is: 

• One or more operands composed of one or 
more expressions, which, in turn, are 
composed of a term or an arithmetic 
combination of terms. 

Operands of machine instructions 
generally represent such things as storage 
locations, general registers, immediate 
data, or constant values. Operands of 
assembler instructions provide the informa- 
tion needed by the assembler program to 
perform the designated operation. 



Figure 2-3 depicts 
Terms shown in Figure 
absolute or relocatabl 
lute or relocatable, 
effect of program r 
Program relocation is 
object program into st 
than those originall 
assembler. A term is 
does not change upon r 
relocatable if its val 
cation. 



this structure. 
2-3 are classed as 
e. Terms are abso- 
depending on the 
elocation upon them, 
the loading of the 
orage locations other 
y assigned by the 
absolute if its value 
elocation. A term is 
ue changes upon relo- 



The following subsection "Terms and 
Expressions" discusses these items as out- 
lined in Figure 2-3. 



TERMS AND EXPRESSIONS 



TERMP 



AS SEMBLER LANGUAGE STRUCTURE 

The basic structure of the language can 
be stated as follows. 

A source statement is composed of: 

• A name entry (usually optional) . 

• An operation entry (required) . 

• An operand entry (usually required) . 

• Comments entry (optional) . 
A name entry is: 

• A symbol. 

An operation entry is: 

• A mnemonic operation code representing 
a machine, assembler, or macro- 
instruction- 



Every term represents a value. This 
value may be assigned by the assembler 
(symbols, symbol length attribute, location 
counter reference) or may be inherent in 
the term itself (self -defining term, 
literal) . 

An arithmetic combination of terms is 
reducea to a single value by the assembler. 

The following material discusses each 
type of term and the rules for its use. 



Symbols 

A symbol is a character or combination of 
characters used to represent locations or 
arbitrary values. Symbols, through their 
use in name fields and in operands, provide 
the programmer with an efficient way to 
name and reference a program element. 
There are three types of symbols: 

1. Ordinary symbols. 

2. Variable symbols. 

3. Sequence symbols. 



10 



Ordinary symbols , created by the pro- 
grammer for use as a name entry and/or an 
operand, must conform to these rules: 

1. The symbol must not consist of more 
than eight characters. The first 
character must be a letter. The other 



2. 



characters may be letters, digits, or 
a consbination of the two. 

No special characters m.ay be included 
in a symbol. 



3. No blanks are allowed in a symbol. 



^ 



Name Entry 



Is a Symbol 
which is an 



Ordinary 
Symbol 
(AT or RT) 



Variable 
Symbol 



Sequence 
Symbol 



A Symbol 
e.g., BETA 
(AT or RT) 





Operation Entry 














Is a Mnemonic 
Operation Code 




















1 




1 




Machine 
Instruction 


or 


Assembler 
Instruction 


or 


Macro 
Instruction 



Term 



which may be 
any one of 
the following 



A Self- 
defining 
Term (AT) 



A Location 
Counter Refer- 
ence i.e., * 
(RT) 



Exp 



Operand Entry 



One or more 
Operands that 
are composed 
of an 



A Literal 
e.g., = F'1259' 
(RT) 



Symbol Length 
Attribute Refer- 
ence e.g., 
L 'Symbol (AT) 



Exp(Exp) 



Exp(Exp, Exp) 



Exp Expression 



Arithmetic 
Combination 
of Terms 



,2 



Other Symbol. 
Attribute 
References (AT) 



Decimal 
e.g., 15 



which may be 
any one of 
the following 



Hexadecimal 
e.g.,X'C4' 



Binary 
e.g.,B'101' 



Character 
e.g.,C'AB9' 



AT = Absolute Term 
RT = Relocatable Term 



May be generated by combination of variable symbols and assembler language characters. (Conditional assembly only) 

2 
Conditional assembly only. 

Figure 2-3. Assembler Language Structure — Machine and Assembler Instructions 
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In the following sections, the term 
symbol refers to ordinary symbol. 

The following are valid symbols: 



The value of a symbol may not 
tive and may not exceed 2^'*-!. 



be nega- 



READER 


L00P2 


aB4 


J\23456 


N 


$A1 


X4F2 


S4 


#56 



The following symbols are invalid, 
the reasons noted: 



2 56B 

REC0RDAREA2 
BCD+34 

IN AREA 



IS 



for 



not 



(first character 

alphabetic) 
(more than eight characters) 
(contains a special character 

- ♦) 

(contains a blank) 



Variable symbols must begin with an 
ampersand (&) followed by one to seven 
letters and/or numbers, the first of which 
must be a letter. Variable symbols are 
used within the source program or macro 
definition to allow different values to be 
assigned to one symbol. A complete dis- 
cussion of variable symbols appears in 
Se ction 6 . 

Sequence symbols consist of a period (.) 
followed by one to seven letters and/or 
numbers, the first of which must be a let- 
ter. Sequence symbols are used to indicate 
the position of statements within the 
source program or macro definition. Through 
their use the programmer can vary the 
sequence in which statements are processed 
by the assembler program. (See the complete 
discussion in Section 6 . ) 

NOTE: Sequence symbols and variable symbols 
are used only for the macro language and 
conditional assembly. Programmei's who do 
not use these features need not be concerned 
with these symbols. 



')E FINING SYMBOLS : The assembler assigns a 
to each symbol . ppearing as a name 
in a source statement. The values 
ned to symbols naming storage areas, 
actions, constants, and control sec- 
are the addresses of the leftmost 



■'■alue 
>ntry 
assig 
instr 
tions 
bytes 
named 
items 
the 
reloc 



of the storage fields containing the 
items. Since the addresses of these 

may change upon program relocation, 
symbols naming them are considered 
ataoie terms. 



A symbol is said to be defined when it 
appears as the name of a source statement. 
(A special case of symbol definition is 
discussed in Section 3, under "Program 
Sectioning and Linking.") 

Symbol definition also involves the 
assignment of a length attribute to the 
symbol. (The assembler maintains an inter- 
nal table - the symbol table - in which the 
values and attributes of symbols are kept. 
When the assembler encounters a symbol in 
an operand, it refers to the table for the 
values associated with the symbol.) The 
length attrirjute of a symbol is the length, 
in bytes, of the storage field whose 
address is represented by the symbol. For 
example, a symbol naming an instruction 
that occupies four bytes of storage has a 
length attribute of 4. Note that there are 
exceptions to this rule; for example, in 
the case where a symbol has been defined by 
an equate to location counter value (EQU *) 
or to a self-defining term, the length 
attribute of the symbol is 1. These and 
other exceptions are noted under the 
instructions involved. The length attri- 
bute is never affected by a duplication 
factor. 

PREVIOUSLY D EFINED SYMBOL S : Some instruc- 
tions require that a symbol appearing in 
the operand entry be previously defined. 
This simply means that the symbol, before 
its use in an operand, m.ust have appeared 
as a name entry in a prior state': -"t ^ . 

GENERAL RESTRICTIONS ON SYMBOL ^; : /i symboi 
may be defined only once in an assembly. 
That is, each symbol used as the name of a 
statement must be unique within that assem- 
bly. However, a symbol may be used in the 
name field more than once as a control 
section name (i.e., defined in the STAKT, 
CSECT, or DSECT assembler statements des- 
cribed in Section 3) because the coding of 
a control section may be suspended and then 
resumed at any subsequent point. The CSECT 
or DSECT statement that resumes the section 
must be named by the same symbol that 
initially named the section; thus, the 
symbol that naines the section m.ust be 
repeated. Such usage is not considered to 
be duplication of a symbol definition. 



A symbol used as a name entry in the 
Equate Symbol (EQU) assembler instruction 
is assigned the value designated in the 
operand entry of the instruction. Since 
the operand entry may represent a relocata- 
ble value or an absolute (i.e., 
nonchanging) value, the symbol is consid- 
ered a relocatable term or an absolute 
term, depending upon the value it is equat- 
ed to- 



Self-Def ininq Terms 

A self-defining term is one whose value 
is inherent in the term. It is not 
assigned a value by the assembler. For 
example, the decimal self-defining term - 
15 - represents a value of 15. The length 
attribute of a self-defining term is always 
1. 



There are four types of self-defining 
terms: decimal, hexadecimal, binary, and 
character. Use of these terms is spoken of 
as decimal, hexadecimal, binary, or charac- 
ter representation of the machine-language 
binary value or bit configuration they 
represent. 

Self-defining terms are classed as abso- 
lute terms, since the values they represent 
do not change upon program relocation. 

USING SELF-DEFINING TERMS; .^.'eif -defining 
terms are the means of specifying machine 
values or bit configurations without equat- 
ing the values to symbols and using the 
symbols . 

Self-defining terms may be used to spec- 
ify such program elements as immediate 
data, masks, registers, addresses, and 
address increments. The type of term, se- 
lected (decimal, hexadecimal, binary, or 
character) will depend on what is being 
specified. 

The use of a self-defining term is quite 
distinct from the use of data constants or 
literals. When a self-defining term is 
used in a machine-instruction statement, 
its value is assembled into the instruc- 
tion. When a data constant is referred to 
or a literal is specified in the operand of 
an instruction, its address is assembled 
into the instruction. Self -defining terms 
are always right- justified; truncation or 
padding with zeros if necessary occurs on 
the left. 



Decimal Self-Defining Term; 



A 



decimal 



self-defining term is simply an unsigned 
decimal number written as a sequence of 
decimal digits. High-order zeros may be 
used (e.g., 007). Limdtations on the value 
of the term depend on its use. For exam- 
ple, a decimal term that designates a 
general register should have a value 
between and 15; one that represents an 
address should not exceed the size of 
storage. In any case, a decimal term may 
not consist of more than eight digits, or 
exceed 16,777,215 12^'*-!). A decimal self- 
defining term is assembled as its binary 
equivalent. Some examples of decimal self- 
defining tern^s are: 8, 147, 4092, and 
00021. 



eight-bit mask would consist of two hexa- 
decimal digits. The maximum value of a 
hexadecimal term is X'FFFFFF'. 

The hexadecimal digits and their bit 
patterns are as follows; 

0- 0000 4- 0100 8- 1000 C- 1100 

1- 0001 5- 0101 9- 1001 D- 1101 

2- 0010 6- 0110 A- 1010 E- 1110 

3- 0011 7- 0111 B- 1011 F- 1111 

A table for converting from hexadecimal 
representation to decimal representation is 
provided in Appendix B. 



Binary Self-Def ininq Term; A binary self- 
defining term is written as an unsigned 
sequence of Is and Os enclosed in 
apostrophes and preceded by the letter B, 
as follows: B' 10001101". This term would 
appear in storage as shown, occupying one 
byte. A binary term may have up to 24 bits 
represented. 

Binary representation is used primarily 
in designating bit patterns of masks or in 
logical operations. 

The following example illustrates a 
binary term used as a mask in a Test Under 
Mask (TM) instruction. The contents of 
GAMMA are to be tested, bit by bit, against 
the pattern of bits represented by the 
binary term. 



r T T 1 

I Name | Operation | Operand | 

|. 1 + ^ 

I ALPHA |TM I GAMMA, B' 10101101' j 
L X X J 



Character Self -Defining Term; A character 
self-defining term consists of one to three 
characters enclosed by apostrophes. It 
must be preceded by the letter C. All 
letters, decimal digits, and special char- 
acters may be used in a character term. In 
addition, any of the remainder of the 256 
punch combinations may be designated in a 
character self -defining term.. Examples of 
character self-defining terms are as fol- 
lows : 



CV 

C • ABC ' 



C ■ (blank) 
C'13' 



Hexadecimal Self-defining Term: A hexa- 
decimal self-defining term consists of one 
to six hexadecimal digits enclosed by 
apostrophes and preceded by the letter X: 
X'C49' . 



Each hexadecimal digit is assembled as 
its four-bit binary equivalent. Thus, a 
hexadecimal term used to represent an 



Because of the use of apostrophes in the 
assembler language and ampersands in the 
macro language as syntactic characters, the 
following rule must be observed when using 
these characters in a character term. 

For each apostrophe or ampersand desired 
in a character self -defining term, two 
apostrophes or ampersands must be written. 
For example, the character value A'# would 
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13 



be written as 'A''^', while an apostrophe 
followed by a blank and anotVier single 
apostrophe would be written as ' ' ' ' ' ' . 

Each character in the character sequence 
is assembled as its eight-bit code equiva- 
lent (see Appendix A) . The two apostrophes 
or ampersands that must be used to rep- 
resent an apostr6phe or ampersand within 
the character sequence are assembled as an 
apostrophe or ampersand. 



Location Counter Reference 



Th e Locati on Counter; A location counter 

is used to assign storage addresses to 
progrart statem.ents. It is the assembler's 
equivalent of the instruction counter in 
the computer. As each machine instruction 
or data area is assembled, the location 
counter is first adjusted to the proper 
boundary for the item, if adjustment is 
necessary, and then incremented by the 
length of the assembled item. Thus, it 
always points to the next available loca- 
tion. If the statement is named by a 
symbol, the value attribute of the symbol 
is the value of the location counter after 
boundary adjustment, but before addition of 
the length. 



The assembler maintains a location 
counter for each control section of the 
program and manipulates each location 
counter as previously described. Source 
statements for each section are assigned 
addresses from the location counter for 
that section. The location counter for 
each successively declared control section 
assigns locations in consecutively higher 
areas of storage. Thus, if a program has 
multiple control sections, all statements 
identified as belonging to the first con- 
trol section will be assigned from the 
location counter for section 1, the state- 
ments for the second control section will 
be assigned from the location counter for 
section 2, etc. This procedure is followed 
whether the statements from different con- 
trol sections are interspersed or written 
in control section sequence. 

The location counter setting can be 
controlled by using the START and ORG 
assembler instructions, which are described 
in Sections 3 and 5. The counter affected 
by either of these assembler instructions 
is the counter for the control section in 
which they appear. The m.aximum value for 
the location counter is 2^'*-!. 

The programmer may refer to the current 
value of the location counter at any place 
in a program by using an asterisk as a term 



in an operand. The asterisk represents the 
location of the first byte of currently 
available storage (i.e., after any required 
boundary adjustment) . Using an asterisk as 
the operand in a machine- instruction state- 
ment is the same as placing a symbol in the 
name field of the statement and then using 
that symbol as an operand of the statement. 
Because a location counter is maintained 
for each control section, a location count- 
er reference designates the location count- 
er for the section in which the reference 
appears. 



A reference t 
be made in a 
(i.e. , the aste 
address constan 
form) . The add 
containing the 
value of the loca 
counter referenc 
statement which 
predefined symbo 
the EQU and ORG a 



Literals 



o the location counter may 
literal address constant 
risk may be used in an 
t specified in literal 
ress of the instruction 
literal is used for the 
tion counter. A location 
e may not be used in a 
requires the use of a 
1, with the exception of 
ssembler instructions. 



A literal term is one of three basic 
ways to introduce data into a program. It 
is simply a constant preceded by an equal 
sign (=) . 

A literal represents data rather than a 
reference to data. The appearance of a 
literal in a statement directs the assem- 
bler program to assemble the data specified 
by the literal, store this data in a 
"literal pool," and place the address of 
the storage field containing the data in 
the operand field of the assembled state- 
ment. 

Literals provide a means of entering 
constants (such as numbers for calculation, 
addresses, indexing factors, or words or 
phrases for printing out a message) into a 
program by specifying the constant in the 
operand of the instruction in which it is 
used. This is in contrast to using the DC 
assembler instruction to enter the data 
into the program and then using the name of 
the DC instruction in the operand. Only 
one literal is allowed in a machine- 
instruction statement. 

A literal term cannot be combined with 
any other terms . 

A literal cannot be used as the receiv- 
ing field of an instruction that modifies 
storage. 

A literal cannot be specified in a shift 
instruction or an I/O instruction (HIO, HDV, 
TIO, SIO, SIOF). 



14 



When a literal is contained in an in- 
struction, it cannot specify an explicit 
base register or an explicit index register. 

A literal cannot be specified in an ad- 
dress constant (see Section 5, DC--Define 
Constant) . 

The instruction coded below shows one 
use of a literal. 

r T T T 

I Name | Operation [Operand | 

^ 1 + ^ 

IGAMMA JL |10,=F'274' | 

L X X J 

The statement GAMMA is a load instruc- 
tion using a literal as the second operand. 
When assembled, the second operand of the 
instruction will be the address at which 
the value F'27U' is stored. 

NOTE: If a literal operand is a self- 
defining term (X,C,B, or decimal) and the 
equal sign (=) is omitted, the statement 
may assemble without error (See "Using 
Self -Defining Terms"). 

In general, literals can be used wherev- 
er a storage address is permitted as an op- 
erand. They cannot, however, be used in 
any assembler instruction that requires the 
use of a previously defined symbol. Liter- 
als are considered relocatable, because the 
address of the literal, rather than the 
literal itself, will be assembled in the 
statement that employs a literal. The 
assembler generates the literals, collects 
them, and places them in a specific area of 
storage, as explained in the subsection 
"The Literal Pool." A literal is not to be 
confused with the immediate data in an SI 
instruction. Immediate data is assembled 
into the instruction. 

Literal Format; The assembler requires a 
description of the type of literal being 
specified as well as the literal itself. 
This descriptive information assists the 
assembler in assembling the literal cor- 
rectly. The descriptive portion of the 
literal must indicate the format of the 
constant. It may also specify the length 
of the constant. 

The method of describing and specifying 
a constant as a literal is nearly identical 
to the method of specifying it in the 
operand of a DC assembler instruction. The 
major difference is that the literal must 
start with an equal sign (=) , which indi- 
cates to the assembler that a literal 
follows. The reader is referred to the 
discussion of the DC assembler instruction 
operand format (Section 5) for the means of 
specifying a literal. The type of literal 
designated in an instruction is not checked 
for correspondence with the operation code 
of the instruction. 



Some examples of literals are 



=A{BETA) 
=F'1234' 

=C'ABC' 



address constant literal, 
a fixed-point number with 
a length of four bytes, 
a character literal. 



The Literal Pool; The literals processed 
by the assembler are collected and placed 
in a special area called the literal pool, 
and the location of the literal,, rather 
than the literal itself, is assembled in 
the statement employing a literal. The 
positioning of the literal pool may be 
controlled by the programmer, if he so 
desires. Unless otherwise specified, the 
literal pool is placed at the end of the 
first control section. 

The programmer may also specify that 
multiple literal pools be created. Howev- 
er, the sequence in which literals are 
ordered within the pool is controlled by 
the assembler. Further information on 
positioning the literal pool(s) is in Sec- 
tion 5 under "LTORG— Begin Literal Pool." 



Symbol Length Attribute Reference 

The length attribute of a symbol may be 
used as a term. Reference to the attribute 
is made by coding L' followed by the 
symbol, as in: 

L'BETA 

The length attribute of BETA will be 
substituted for the term. The use of the 
length attribute of a symbol defined with 
a DC or DS with explicit length given by 
an expression is invalid. The following 
example illustrates the use of L' symbol 
in moving a character constant into either 
the high-order or low-order end of a 
storage field. 

For ease in following the example, the 
length attributes of Al and B2 are men- 
tioned. However, keep in mind that the 
L' symbol term makes coding such as this 
possible in situations where lengths are 
unknown. 



r T T 

I Name | Operation | Operand 
^ 1 

I Al I DS 

|B2 I DC 

IHIORD |MVC 

j LOORD I MVC 



.| ^ 

1CL8 I 

|CL2*AB' I 

IA1(L'B2),B2 I 

iAl+L'Al-L'B2(L"B2) , B2 | 



Al names a storage field eight bytes in 
length and is assigned a length attribute 
of 8. B2 names a character constant two 
bytes in length and is assigned a length 
attribute of 2. The statement named HIORD 
moves the contents of B2 into the leftmost 
two bytes of Al. The term L'B2 in paren- 
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theses provides the length specification 
required by the instruction. When the 
instruction is assembled, the length is 
placed in the proper field of the machine 
instruction. 

The statement named LOORD moves the 
contents of B2 into the rightmost two bytes 
of Al. The combination of terms 
A1+L'A1-L'B2 results in the addition of the 
length of Al to the beginning address of 
Al, and the subtraction of the length of B2 
from this value. The result is the address 
of the seventh byte in field Al. The 
constant represented by B2 is moved into Al 
starting at this address. L'B2 in 
parentheses provides length specification 
as in HIORD. 

N ote; As previously stated, the length 
attribute of ♦ is equal to the length of 
the instruction in which it appears, except 
in an EQU to ♦, in which case the length 
attribute is 1. 



EXPRESSIONS 



This subsection discusses the expres- 
sions used in coding operand entries for 
source statements. Two types of expres- 
sions, absolute and relocatable, are pre- 
sented along with the rules for determining 
these attributes of an expression. 

As shown in Figure 2-3, an expression is 
composed of a single term or an arithmetic 
combination of terms. The following are 
examples of valid expressions: 



AREAl+X' 2D' 

* + 32 

N-25 

FIELD+332 

FIELD 

(EXIT-ENTRY+1)+G0 

=F'123a' 

ALPHA-BETA/ (10+ AREA* L' FIELD) -100 



BETA* 10 

B'lOl' 

C ' ABC ' 

29 

L' FIELD 

LAMBDA+ GAMMA 

TEN /TWO 



Terms in Parentheses 



Terms in parentheses are reduced to a 
single value; thus, the terms in parenthe- 
ses, in effect, become a single term. 

Arithmetically combined terms, enclosed 
in parentheses, may be used in combination 
with terms outside the parentheses, as 
follows : 

la+BETA- (GAMMA- LAMBDA) 

When the assembler program encounters 
terms in parentheses in combination with 
other terms, it first reduces the combina- 
tion of terms inside the parentheses to a 
single value which may be absolute or 
relocatable, depending on the combination 
of terms. This • value then is used in 
reducing the rest of the combination to 
another single value. 



Terms in parentheses may be included 
within a set of terms in parentheses: 

A+B-(C+D-(E+F)+10) 



The innermost set of terms in parenthe- 
ses is evaluated first. Five levels of 
parentheses are allowed; a level of paren- 
theses is a left parenthesis and its cor- 
responding right parenthesis. Parentheses 
which occur as part of an operand format do 
not count in this limit. Pax arithmetic 
combination of terms is evaluated as de- 
scribed in the next section "Expressions." 



The rules for coding expressions are: 

1. An expression cannot start with an 
arithmetic operator, ( +-/* ) . There- 
fore, the expression -A+BETA is inval- 
id. However, the expression 0-A+BETA 
is valid. 

2. An expression cannot contain two 
terms or two operators in succession. 

3. An expression cannot consist of more 
than 16 terras. 

4. An expression cannot have more than 
five levels of parentheses. 

5" A multiterm expression cannot con- 
tain a literal. 



Evaluation of Expressions 

A single — terra expression, e.g., 29, 
BETA, *, L' SYMBOL, takes on the value of 
the term involved. 

A multiterm expression, e.g., BETA+10, 
ENTRY-EXIT, 25+10+A/B, is reduced to a 
single value, as follows: 

1. Each term is evaluated. 

2. Every expression is computed to 32 
bits, and then truncated to the right- 
most 24 bits. 

3. Arithmetic operations are performed from 
left to right except that multiplication 
and division are done before addition 
and subtraction, e.g., A+B*C is evaluated 
as A+(B*C), not (A+B)*C. The computed 
result is the value of the expression. 
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4. Division always yields an integer 
result; any fractional portion of the 
result is dropped. E.g. , 1/2*10 
yields a zero result, whereas 10*1/2 
yields 5. 

5. Division by zero is permitted and 
yields a zero result. 

Parenthesized multiterm subexpressions 
are processed before the rest of the terms 
in the expression, e.g., in the expression 
A+BETA*(CON-10) , the term CON-10 is 
evaluated first and the resulting value is 
used in computing the final value of the 
expression. 

Negative values are carried in twos 
complement form. Final values of ex- 
pressions are the rightmost 24 bits of 
the results. Intermediate results have 
a range of -231 through 231-1. However, 
the value of an expression before trunca- 
tion must be in the range -224 through 
2 24_i or the results will be meaningless. 
A negative result is considered to be a 
3-byte positive value. 

NOTE: In A-type address constants, the 
full 32-bit final expression result is 
truncated on the left to fit the specified 
or implied length of the constant. 



Absolute and Relocatable Expressions 



An expression is called absolute if its 
value is unaffected by program relocation. 

An expression is called relocatable if 
its value depends upon program relocation. 

The two types of expressions, absolute 
and relocatable, take on these charac- 
teristics from the term or terms composing 
them. 

Absolute Expression ; An absolute expres- 
sion can be an absolute term or any arith- 
metic combination of absolute terms. An 
absolute term can be a non-relocatable 
symbol, any of the self-defining terms, or 
the length attribute reference. As indi- 
cated in Figure 2-3, all arithmetic opera- 
tions are permitted between absolute terms . 

An expression is absolute, even though 
it may contain relocatable terms (RT)-- 
alone or in combination with absolute terms 
(AT) — under the following conditions. 

1. There must be an even number of relo- 
catable terms in the expression. 

2. The relocatable terms must be paired. 
Each pair of terms must have the same 
relocatability , i.e., they appear in 
the same control section in this 
assembly (see Program Sectioning and 
Linking, Section 3) . Each pair must 



consist of terms with opposite signs. 
The paired terms do not have to be 
contiguous, e.g., RT+AT-RT. 

3. No relocatable term can enter into a 
multiply or divide operation. Thus, 
RT-RT+10 is invalid. However, 
(RT-RT)*10 is valid. 

The pairing of relocatable terms (with 
opposite signs and the same relocat- 
ability) cancels the effect of reloca- 
tion since both symbols would be relocated 
by the same amount. Therefore the value 
represented by the paired terms remains 
constant, regardless of program relocation. 
For example, in the absolute expression 
A-Y+X, A is an absolute term, and X and Y 
are relocatable terms with the same re- 
locatability. If A equals 50, Y equals 
25, and X equals 10, the value of the 
expression would be 35. If X and Y are 
relocated by a factor of 100 their values 
would then be 125 and 110. However, the 
expression would still evaluate as 35 
(50-125+110=35) . 

An absolute expression reduces to a 
single absolute value- 

The following examples illustrate abso- 
lute expressions. A is an absolute term; X 
and Y are relocatable terms with the same 
relocatability . 

A-Y+X 

A 

A*A 

X-Y+A 

♦-Y (a reference to the location counter 
must be paired with another relocata- 
ble term from the same control sec- 
tion, i.e., with the same relocatabil- 
ity) 



Relocatable Expressions ; A relocatable 
expression is one whose value changes by 
n if the program in which it appears is 
relocated n bytes away from its originally 
assigned area of storage. All relocatable 
expressions must have a positive value. 

A relocatable expression can be a relo- 
catable term. A relocatable expression can 
contain relocatable terms -- alone or in 
combination with absolute terms -- under 
the following conditions: 



1. There must be an odd number of reloca- 
table terms. 

2. All the relocatable terms but one must 
be paired. Pairing is described in 
Absolute Expression . 

3. The unpaired term must not be directly 
preceded by a minus sign. 

'i- No relocatable term can enter into a 
multiply or divide operation. 
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A relocatable expression reduces to a 
single relocatable value. This value is 
the value of the odd relocatable term, 
adjusted by the values represented by the 
absolute terms and/or paired relocatable 
terms associated with it. The relocatabil- 
ity attribute is that of the odd relocata- 
ble term. 

For example, in the expression W-X+W-10, 
W and X are relocatable terms with the same 
relocatability attribute. If initially W 
equals 10 and X equals 5, the value of the 
expression is 5. However, upon relocation 
this value will change. If a relocation 
factor of 100 is applied, the value of the 
expression is 105. Note that the value of 
the paired terms, W-X, remains constant at 
5 regardless of relocation. Thus, the new 



value of the expression, 105, is the result 
of the value of the odd term (W) adjusted 
by the values of W-X and 10. 



The following examples illustrate relo- 
catable expressions. A is an absolute 
term, W and X are relocatable terms with 
the same relocatability attribute, Y is a 
relocatable term with a different relocat- 
ability attribute. 



Y-32+A W-X+* 
W-X+Y 

♦ (reference to 
location counter) 



=F'1234' (literal) 

A+A+W-W+Y 

W-X+W 

Y 
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SECTION 3: ADDRESSING — PROGRAM SECTIONING AND LINKING 



ADDRESSING 



BASE REGISTER INSTRUCTIONS 



The IBM System/360 addressing technique 
requires the use of a base register,, which 
contains the base address, and a displace- 
ment, which is added to the contents of the 
base register. The programmer may specify 
a symbolic address and request the assem- 
bler to determine its storage address com- 
posed of a base register and a displace- 
ment. The programmer may rely on the 
assembler to perform this service for him 
by indicating which general registers are 
available for assignment and what values 
the assembler may assume each contains. 
The programmer may use as many or as few 
registers for this purpose as he desires. 
The only requirement is that, at the point 
of reference, a register containing an 
address from the same control section is 
available, and that this address is less 
than or equal to the address of the item to 
which the reference is being made. The 
difference between the two addresses may 
not exceed 4 09 5 bytes. 



ADDRESSES -- EXPLICIT AND IMPLIED 



An address is composed of a displacement 
plus the contents of a base register. (In 
the case of RX instructions, the contents 
of an index register are also used to 
derive the address in the machine.) 



The USING and DROP assembler instruc- 
tions enable programmers to use expressions 
representing implied addresses as operands 
of machine-instruction statements, leaving 
the assignment of base registers and the 
calculation of displacements to the assem- 
bler. 



In order to use sym 
field of machine-ins 
the programmer must ( 
assembler, by means 
that one or more ge 
available for use a 
specify, by means of t 
what value each base r 
(3) load each base re 
he has specified for i 



bols in the operand 
truction statements, 
1) indicate to the 
of a USING statement, 
neral registers are 
s base registers, (2) 
he USING statement, 
egister contains, and 
gister with the value 
t. 



Having the assembler determine base reg- 
isters and displacements relieves the pro- 
grammer of separating each address into a 
displacement value and a base address 
value. This feature of the assembler will 
eliminate a likely source of programming 
errors, thus reducing the time required to 
check out programs. To take advantage of 
this feature, the programmer uses the USING 
and DROP instructions described in this 
subsection- The principal discussion of 
this feature follows the description of 
both instructions. 



The programmer writes an explicit 
address by specifying the displacement and 
the base register number. In designating 
explicit addresses a base register may not 
be combined with a relocatable symbol. 



He writes an implied address by speci- 
fying an absolute or relocatable address. 
The assembler has the facility to select a 
base register and compute a displacement, 
thereby generating an explicit address from 
an implied address, provided that it has 
been informed (1) what base registers are 
available to it and (2) what each contains. 
The programmer conveys this information to 
the assembler through the USING and DROP 
assembler instructions. 



USING — Use Base Address Register 

The USING instruction indicates that one 
or more general registers are available for 
use as base registers. This instruction 
also states the base address values that 
the assenibler may assume will be in the 
registers at object time. Note that a 
USING instruction does not load the reg- 
isters specified. It is the programmer's 
responsibility to see that the specified 
base address values are placed into the 
registers. Suggested loading methods are 
described in the subsection "Programming 
with the USING Instruction." A reference 
to any name in a control section cannot 
occur in a machine instruction or an S-type 
address constant before the USING statement 
that makes that name addressable. The 
format of the USING instruction statement is : 
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f" 



Name 



"T T- 

I Operation | Operand 



l-ir^nr--+ + -I 



L 



A se- 
quence 
symbol 
or 
blank 



USING I From 2-17 expressions 
I of the form v,rl, 
|r2,r3, . . . , rl6 



Operand v must be an absolute or reloca- 
table expression. It may be a negative 
number whose absolute value does not exceed 
2 2**. No literals are permitted. Operand v 
specifies a value that the assembler can 
use as a base address. The other operands 
must be absolute expressions. The operand 
rl specifies the general register that can 
be assumed to contain the base address 
represented by operand v. Operands r2, r3, 
r4, . . . specify registers that can be 
assumed to contain V+U096, v+8192, v+12288, 
. , respectively. The values of the 
operands rl, r2, r3, ..., rl6 must be 
between and 15. For example, the state- 
ment: 



2. register must be specified as operand 
rl. 

The assembler assumes that register 
contains zero. Therefore, regardless of 
the value of operand v, it calculates dis- 
placements as if operand v were absolute 
or relocatable zero. The assembler also 
assumes that subsequent registers specified 
in the same USING statement contain 4096, 
8192, etc. 

NOTE: If register is used as a base 
register, the program is not relocatable, 
despite the fact that operand v may be 
relocatable. The program can be made re- 
locatable by: 

1. Replacing register in the USING 
statement. 

2. Loading the new register with a re- 
locatable value. 

3. Reassembling the program. 



r T T 1 

I Name | Operation | Operand | 

|. 1 + ^ 

I JUSING I*, 12, 13 I 

L X J. J 



te;lls the assembler it may assume that the 
current value of the location counter will 
be in general register 12 at object time, 
and that the current value of the location 
counter, incremented by 4 096, will be in 
general register 13 at object time. 

If the programmer changes the value in a 
base register currently being used, and 
wishes the assembler to compute displace- 
ment from this value, the assembler must be 
told the new value by means of another 
USING statement. In the following sequence 
the assembler first assumes that the value 
of ALPHA is in register 9. The second 
statement then causes the assembler to 
assume that ALPHA+1000 is the value in 
register 9 . 



r T T 

I Name | Operation | Operand 
|. 1 1 

I I USING I ALPHA, 9 



DROP — Drop Base Registe r 



The DROP instruction specifies a pre- 
viously available register that may no 
longer be used as a base register. The 
format of the DROP instruction statement is 
as follows: 



r T T 

I Name [Operation 1 Operand 



A se- 
quence 



DROP 



symbol 
or 
|^_bLank__i 



4 

I Up to 16 absolute 
I expressions of the 
I form rl,r2, 
|r3, . . .,rl6 
-X 



The expressions indicate general reg- 
isters previously named in a USING state- 
ment that are now unavailable for base 
addressing. The following statement, for 
example, prevents the assembler from using 
registers 7 and 11: 

r T T 1 

I Name | Operation | Operand 1 

1 1 + ^ 

1 I DROP I 7, 11 I 

L-.^ X . X J 



I I USING I ALPHA+1000, 9 | 

L X X J 

If the programmer has to refer to the 
first 4096 bytes of storage, he can use 
general register as a base register sub- 
ject to the following conditions: 

1. The value of operand v must be either 
absolute or relocatable zero or simply 
relocatable, and 



It is not necessary to use a DROP 
statement when the base address being used 
is changed by a USING statement; nor are 
DROP statements needed at the end of the 
source program. 

A register made unavailable by a DROP 
instruction can be made available again by 
a subsequent USING instruction. 
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PROGRAMMING WITH THE USING INSTRUCTION 



The USING (and DROP) instructions may be 
used anywhere in a program, as often as 
needed, to indicate the general registers 
that are available for use as base reg- 
isters and the base address values the 
assembler may assume each contains at ex- 
ecution time. Whenever an address is spec- 
ified in a machine- instruction statement, 
the assembler determines whether there is 
an available register containing a suitable 
base address. A register is considered 
available for a relocatable address if it 
was specified in a USING instruction to 
have a relocatable value. A register with 
an absolute value is available only for 
absolute addresses. In either case, the 
base address is considered suitable only if 
it is less than or equal to the address of 
the item to which the reference is made. 
The difference between the two addresses 
may not exceed 4 095 bytes. In calculating 
the base register to be used, the assembler 
will always use the available register 
giving the smallest displacement. If there 
are two registers with the same value, the 
highest numbered register will be chosen. 



r T T 

I Name | Operation | Operand 
j. 1 ^ 



BEGIN 



BALR 
USING 



FIRST I 



LAST 



END 



2,0 
*,2 



BEGIN 



location. When employing this method, the 
USING instruction must immediately follow 
the BALR instruction. No other USING or 
load instructions are required if the loca- 
tion named LAST is within 4 095 bytes of 
FIRST. 

In Figure 3-1, the BALR and LM instruc- 
tions load registers 2-5. The USING 
instruction indicates to the assembler that 
these registers are available as base reg- 
isters for addressing a maximum of 16,38 4 
consecutive bytes of storage, beginning 
with the location named HERE. The number 
of addressable bytes may be increased or 
decreased by altering the number of reg- 
isters designated by the USING and LM 
instructions and the number of address 
constants specified in the DC instruction. 



RELATIVE ADDRESSING 



Relative addressing is the technique of 
addressing instructions and data areas by 
designating their location in relation to 
the location counter or to some symbolic 
location. This type of addressing is 
always in bytes, never in bits, words, or 
instructions. Thus, the expression *+4 
specifies an address that is four bytes 
greater than the current value of the 
location counter. In the sequence of 
instructions shown in the following exam- 
ple, the location of the CR machine 
instruction can be expressed in two ways, 
ALPHA+2 or BETA-4, because all of the 
mnemonics in the example are for 2-byte 
instructions in the RR format. 



L X X J 



In the preceding sequence, the BALR 
instruction loads register 2 with the 
address of the first storage location 
immediately following. In this case, it is 
the address of the instruction named FIRST. 
The USING instruction indicates to the 
assembler that register 2 contains this 



[Name 



■T T 

I Operation | Operand 



1 ALPHA 


|LR 


|3,4 


1 


|CR 


|4,6 


1 


|BCR 


|1,14 


IBETA 


|AR 


|2,3 


L 


_X 


X 



I Name | Operation j Operand 

f. 1_1 4. 

2,0 

HERE, 2, 3, 4, 5 

3,5, BASEADDR 

FIRST 

A(HERE+4096,HERE+8192,HERE+12288) 



BEGIN 


BALR 




USING 


HERE 


LM 




B 


BASEADDR 


DC 


FIRST 





LAST 



END 



L X 



BEGIN 

X J 



Figure 3-1. Multiple Base Register Assignment 
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PROGRAM SECTIONING AND LINKING 



It is often convenient, or necessary, to 
write a large program in sections. The 
sections may be assembled separately, then 
combined into one object program. The 
assembler provides facilities for creating 
raultisectioned programs and symbolically 
linking separately assembled programs or 
program sections. 



Sectioning a program is optional, and 
many programs can best be written without 
sectioning them. The programmer writing an 
unsectioned program need not concern him- 
self with the subsequent discussion of 
program sections, which are called control 
sections. He need not employ the CSECT 
instruction, which is used to identify the 
control sections of a multisection program. 
Similarly, he need not concern himself with 
the discussion of symbolic linkages if his 
program neither requires a linkage to nor 
receives a linkage from another program. 
He may, however, wish to identify the 
program and/or specify a tentative starting 
location for it, both of which may be done 
by using the START instruction. He may 
also want to employ the dummy section 
feature obtained by using the DSECT 
instruction. 

Note : Program sectioning and linking is 
closely related to the specification of 
base registers for each control section. 
Sectioning and linking examples are provid- 
ed under the heading "Addressing External 
Control Sections." 



program are often used interchangeably.) 
An unsectioned program is treated as a 
single control section-. To the linkage 
editor, there are no programs, only control 
sections that must be fashioned into a load 
module. 

The output from the assembler is called 
an object module. It contains data re- 
quired for linkage editor processing. The 
external symbol dictionary, which is part 
of the object module, contains information 
the linkage editor needs in order to com- 
plete cross-referencing between control 
sections as it combines them into an object 
program. The linkage editor can take 
control sections from various assemblies 
and combine them properly with the help of 
the corresponding control dictionaries. 
Successful combination of separately 
assembled control sections depends on the 
techniques used to provide symbolic 
linkages between the control sections. 



Whether the programmer writes an unsec- 
tioned program, a multisection program, or 
part of a multisection program, he still 
knows what eventually will be entered into 
storage because he has described storage 
symbolically. He may not know where each 
section appears in storage, but he does 
know what storage contains. There is no 
constant relationship between control sec- 
tions. Thus, knowing the location of one 
control section does not make another con- 
trol section addressable by relative 
addressing techniques. 



CONTROL SECTIONS 



The concept of program sectioning is a 
consideration at coding time, assembly 
tirr.e, and loeid tim.e. To the programmer, a 
program is a logical unit. He may want to 
divide it into sections called control 
sections; if so, he writes it in such a way 
that control passes properly from one sec- 
tion to another regardless of the relative 
physical position of the sections in stor- 
age. A control section is a block of 
coding that can be relocated, independently 
of other coding, at load time without 
altering or impairing the operating logic 
of the program. It is normally identified 
by the CSECT instruction. However, if it 
is desired to specify a tentative starting 
location, the START instruction may be used 
to identify the first control section. 



The programmer must be aware that there 
is a limit to external symbol dictionary 
entries. The total number of control 
sections, dummy sections, unique symbols 
in EXTRN and WXTRN statements, V-type 
address constants, and external dummy 
sections must not exceed 255. Certain con- 
stants may cause a symbol to be counted 
twice: e.g., external symbols in V-type 
address constants (unless they are expli- 
citly defined in an EXTRN or WXTRN state- 
ment) , and external dummy sections 
implicitly defined by Q-type address 
constants and corresponding DSECT state- 
ments. EXTRN and WXTRN statements are 
described in this section; V-type and 
Q-type constants in Section 5 under 
"Operand Subfield 4: Constant." 



Control Section Location Assignment 



To the assembler, there is no such thing 
as a program; instead, there is an assem- 
bly, which consists of one or more control 
sections. (However, the terms assembly and 



Control sections can be intermixed 
because the assembler provides a location 
counter for each control section. Loca- 
tions are assigned to control sections as 
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if the sections are placed in storage The assembler uses the self-defining 
consecutively, in the same order as they term specified by the operand as the ini- 
first occur in the program. Each control tial location counter value of the program, 
section subsequent to the first begins at This value should be divisible by eight. 
the next available double-word boundary. For example, either of the following state- 
ments could be used to assign the name 
PR0G2 to the first control section and to 
indicate an initial assembly location coun- 
ter value of 2040. If the operand is omit- 
ted, the assembler sets the initial location 
counter value of the program at zero. The 
location counter is set at the next double- 
word boundary when the value of the START 
operand is not divisible by eight. 
Its initial location counter value may 
be specified as an absolute value, if 

the START instruction is used. ^ |^ .. "f^ , I 

I Name | Operation | Operand | 

It contains the literals of the program, I I I i 

unless their positioning has been altered | proG2 [START 12040 | 

by LTORG statements. |PR0G2 | START |X'7F8' | 

L ± ± J 



FIRST CONTROL SECTION 



The first control section of a program 
has the following special properties: 



START — Start Assembly 



The START instruction may be used to 
give a name to the first (or only) control 
section of a program. It may also be used 
to specify an initial location counter 

value for the first control section of the 
program. The format of the START instruc- 
tion statement is as follows: 



r T T T 

I Name | Operation | Operand | 

^ 1 1 _ ^ 

I Any I START |A self -defining | 
I symbol j jterm, or blank | 

I or blank j j j 

u 1 J. J 



If a symbol names the START instruction, 
the symbol is established as the name of 
the control section. If not, the control 
section is considered to be unnamed. All 
subsequent statements are assembled as part 
of that control section. This continues 
until a CSECT instruction identifying a 
different control section or a DSECT 
instruction is encountered. A CSECT 
instruction named by the same symbol that 
names a START instruction is considered to 
identify the continuation of the control 
section first identified by the START. 
Similarly, an unnamed CSECT that occurs in 
a program initiated by an unnamed START is 
considered to identify the continuation of 
the unnamed control section. 

The symbol in the name field is a valid 
relocatable symbol whose value represents 
the address of the first byte of the 
control section. It has a length attribute 
of 1. 



Note: The START instruction must not be 
preceded by any code that will cause an 
unnamed control section to be assembled, 
(See "Unnamed First Control Section" 
below. ) 

CSECT — Identif y Control Section 



The CSECT instruction identifies the 
beginning or the continuation of a control 
section. The format of the CSECT instruc- 
tion statement is as follows: 



J. ^ ^ ^ 

I Name | Operation [Operand | 

^ 1 1 ^ 

I Any I CSECT | Not used; should | 
j symbol j j be blank | 
lor blank j I \ 
L J.. 1 I 

If a symbol names the CSECT instruction, 
the symbol is established as the name of 
the control section; otherwise the section 
is considered to be unnamed. All state- 
ments following the CSECT are assembled as 
part of that control section until a state- 
ment identifying a different control sec- 
tion is encountered (i.e., another CSECT or 
a DSECT instruction) . 

The symbol in the name field is a valid 
relocatable symbol whose value represents 
the address of the first byte of the 
control section. It has a length attrioute 
of 1. 

Several CSECT statements with the same 
name may appear within a program.. The 
first is considered to identify the begin- 
ning of the control section; the rest 
identify the resumption of the section. 
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Thus, statements from different control 
sections may be interspersed. They are 
properly assembled (assigned contiguous 
storage locations) as long as the state- 
ments from the various control sections are 
identified by the appropriate CSECT 
instructions . 



Of course, it is possible to write a pro- 
gram that does not contain CSECT or START 
statements. It will then be assembled as 
one unnamed control section. 



DSECT 



Identify Dummy Section 



U nnamed First Control Sectio n 

All machine instructions and many assem- 
bler instructions have to belong to a con- 
trol section. If such an instruction pre- 
cedes the first CSECT instruction, the 
assembler will consider it to belong to an 
unnamed control section (also referred to 
as private code) , which will be the first 
(or only) control section in the module. 

The following instructions will not 
cause this to happen, since they do not 
have to belong to a control section: 

Common Control Sections 

Dummy Control Sections 

Macro Definitions 

Conditional Assembly Instructions 

Comments 

COPY (depends on the copied code) 

DXD 

EJECT 

ENTRY 

EXTRN 

ICTL 

ISEQ 

OPSYN 

PRINT 

PUNCH 

REPRO 

SPACE 

TITLE 

WXTRN 

No Other assembler or machine instructions 

can precede a START instruction, since START, 

if used, must initiate the first control 
section in the program. 

An involuntary unnamed control section 
at the beginning can cause trouble if 
literals are used. Then the programmer must 
be aware of the fact, that unless he codes 
an LTORG statement in each control section 
where he uses literals, literals will be 
assembled in the first control section, 
which will in this case be the involuntary 
section. If that control section does not 
establish addressability (through USING) , 
an addressability error will be the result. 
Therefore statements like EQU should not 
be placed before the first CSECT or the 
START instruction. 

Resumption of an unnamed control section 
at later points can be accomplished through 
unnamed CSECT statements. A program can 
contain only one unnamed control section. 



A dummy section represents a control 
section that is assembled but is not part 
of the object program. A dummy section is 
a convenient means of describing the layout 
of an area of storage without actually 
reserving the storage. (It is assumed that 
the storage is reserved either by some 
other part of this assembly or else by 
another assembly. ) The DSECT instruction 
identifies the beginning or resumption of a 
dummy section. More than one dummy section 
may be defined per assembly, but each must 
be named. The format of the DSECT instruc- 
tion statement is as follows: 



Name 


Operation 


Operand 


A vari- 
able symbol 
or ordinary 
symbol 


DSECT 


Not used; should 
be blank 



The symbol in the name field is a valid 
relocatable symbol whose value represents 
the first byte of the section. It has a 
length attribute of 1. 

Program statements belonging to dummy 
sections may be interspersed throughout the 
program or may be written as a unit. In 
either case, the appropriate DSECT instruc- 
tion should precede each set of statements. 
When multiple DSECT instructions with the 
same name are encountered, the first is 
considered to initiate the dummy section 
and the rest to continue it. All assembler 
language instructions may occur within 
dummy sections. 

Symbols that name statements in a dummy 
section may be used in USING instructions. 
Therefore, they may be used in program 
elements (e.g., machine- instructions and 
data definitions) that specify storage 
addresses. An example illustrating the use 
of a dummy section appears subsequently 
under "Addressing Dummy Sections." 
Note ; Symbols that name statements in a 
dummy section may be used in A-type address 
constants only when they are paired with 
another symbol from the same dummy section 
in an absolute expression. (See "Absolute 
and Relocatable Expressions", Section 2). 
For example, if X and B name statements in 
the same dummy section, C DC A(B-X) would 
be valid, but C DC A(X) would be invalid — 
yielding a relocatability error. 
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DUMMY SECTION LOCATION ASSIGNMENT; A loca- 
tion counter is used to determine the 
relative locations of nar^ied program ele- 
ments in a dumiry section. The location 
counter is always set to zero at the 
beginning of the dummy section, and the 
location values assigned to symbols that 
name statements in the dummy section are 
relative to the initial statement in the 
section. 



Assembly 1, during execution, loads the 
actual beginning address of the input area 
in general register 3. Because the symbols 
used in the DSFCT section are defined 
relative to the initial statement in the 
section, the address values they represent, 
will, at the time of program execution, be 
the actual storage locations of the input 
area. 



ADDRESSING DUMMY SECTIONS; The programmer 
may wish to describe the format of an area 
whose storage location will not be deter- 
mined until the program is executed. He 
can describe the format of the area in a 
dummy section, and he can use symbols 
defined in the dummy section as the oper- 
ands of machine instructions. To effect 
references to the storage area, he does the 
following: 

1. Provides a USING statement specifying 
both a general register that the 
assenibler can assign to the machine- 
instructions as a base register and a 
value from the dumiriy section that the 
assembler may assume the register con- 
tains. 

2. Ensures that the same register is 
loaded with the actual address of the 
storage area. 

The values assigned to symbols defined 
in a dummy section are relative to the 
initial statement of the section. Thus, 
all machine-instructions which refer to 
names defined in the dummy section will, at 
execution time, refer to storage locations 
relative to the address loaded into the 
register. 

An example is shown in the following 
coding. Assume that two independent assem- 
blies (assembly 1 and assembly 2) have been 
loaded and are to be executed as a single 
overall program. Assembly 1 is an input 
routine that places a record in a specified 
area of storage, places the address of the 
input area containing the record in general 
register 3, and branches to assembly 2. 
Assembly 2 processes the record. The cod- 
ing shown in the example is from assembly 
2. 

The input area is described in assembly 
2 by the DSECT control section named INAR- 
EA. Portions of the input area (i.e., 
record) that the programmer wishes to work 
with are named in the DSECT control section 
as shown. The assembler instruction USING 
INAREA,3 designates general register 3 as 
the base register to be used in addressing 
the DSECT control section, and that general 
register 3 is assumed to contain the 
address of INAREA. 



Name 



[- 



T T 

I Operation | Operand 



IASMBLY2 1 


CSECT 


[BEGIN 


BALR 




USING 




USING 




CLI 




BE 


1 ATYPE 


MVC 




MVC 


1 WORKA 


DS 


1 WORKB 


DS 


1 INAREA 


DSECT 


1 INCODE 


DS 


1 INPUTA 


DS 


1 INPUTB 


DS 




|END 



2,0 
*,2 



INAREA, 3 
INCODE, C A* 
ATYPE 



WORKA, INPUTA 
WORKB, INPUTB 



CL20 
CLI 8 



CLI 

CL20 

CL18 



The programmer must ensure that a section 
of code in his program is actually described 
by the dummy section which references it. 
Consider the following example, which 
illustrates how a dummy section should not 
be addressed: 



Name 


Operation 


Operand 


TEST 

HALF 
FULL 


CSECT 

CNOP 

DS 

DS 

END 


2,4 
CL2 

F 


AREA 
HALF 
FULL 


DSECT 

DS 

DS 


CL2 
F 



Section 3 
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Note that in the duinmy section AREA, two 
bytes are skipped between HALF and FULL in 
order to align FULL on a fullword boundary. 
In the control section TEST, however, the 
CNOP instruction causes two bytes to be 
skipped. Thus FULL is properly aligned with- 
out skipping any bytes between HALF and 
FULL. 

When the programmer addresses the dummy 
section, the location of FULL (relative to 
the location of HALF) will not be the same 
as the location of FULL in the control 
section. 

Note : To correct this example change the 
CNOP instruction to CNOP 0,4. 

EXTERNAL DUMMY SECTIONS (ASSEMBLER F ONLY) 

External dummy sections facilitate com- 
munication between programs by allowing the 
programmer to define work areas in several 
different programs and then at execution to 
combine them into one block of storage 
accessible to each program. Several dif- 
ferent programs may be assembled together, 
each with one or more external dummy sec- 
tions and after the linkage editor process- 
es these programs, the programmer can allo- 
cate storage for the dummy sections in one 
block. External dummy sections are defined 
through the use of the DXD instruction or a 
DSECT in combination with a Q-type DC in- 
struction. In order to allocate the cor- 
rect amount of storage when the program is 
executed, the programmer must use the CXD 
instruction, described below, within one 
of the programs. 

DXD — DEFINE EXTERNAL DUMMY SECTION 

The DXD instruction (also referred to 
as a Pseudo Register) defines an external 
dummy section; when the assembler encoun- 
ters a DXD instruction, it computes the 
amount of storage required and the align- 
ment and passes this information to the 
linkage editor which will compute the total 
length of the external dummy sections. The 
format for the DXD instruction is: 



uses the largest section in computing total 
length; if two or more identically named 
external dummy sections have different 
boundary alignments, the linkage editor 
uses the most restrictive alignment in 
computing total length. An external dummy 
section is generated by a Q-type address 
constant which references a DSECT name. 



CXD - CUMULATIVE LENGTH EXTERNAL DUMMY 
SECTION 



The CXD instruction allocates a four-byte 
full-word aligned area in storage which will 
contain the sum of the lengths of all ex- 
ternal dummy sections when the program is 
executed. This sum is supplied by the link- 
age editor. The instruction format is: 



Name 



I Any symbol or 
I blank 



i Operation | Operand 



+ ^ 

CXD iMust be blank I 
I I I 



The CXD instruction may appear anywhere 
within a program, or if several programs 
are being combined, it may appear in each 
program. The symbol in the name field 
has a length attribute of U. 

The following example shows how external 
dummy sections may be used. 







ROUTINE 


A 






r 

1 Name 


T 

[Operation 
1 




~T ~ 

1 Operand 
_ I 


1 
J 


1 ALPHA 


t 
|DXD 






|2DL8 




|BETA 


|DXD 






1 UFL4 




1 OMEGA 


|CXD 
1 . 
1 • 
|DC 
|DC 
1 . 






1 
1 

1 

IQ(ALPHA) 
IQ(BETA) 
1 






1 . 






1 


J 



J. -^ ^ ^ 

I Name | Operation | Operand | 

y 1 _ 1. ^ 

I A symbol I DXD | Duplication factor, | 
I I [type, length, constant! 

L X X . J 



The symbol in the name field is a symbol 

that usually appears as a Q-type constant 

in the operand field 

later in the program. 

attribute of 1. The 

alignment are the same 

for the DS instruction. If more than one 

external dummy section with the same name 

is encountered by the linkage editor, it 



of 
It 

operand 
as that 



a DC statement 

has a length 

form and 

descxibed 



GAMMA 
I DELTA 



ROUTINE B 



JName j Operation j Operand 



DXD 
DXD 



DC 
DC 



L_. X 



5D 
lOF 



IQ (GAMMA) 

Q (DELTA) 



X J 
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ROUTINE C 



I Name 

I- 

EPSILON 



j Operation 



j Operand 



+ + 



DXD 



DC 



HE 



I 

I 

I Q (EPSILON) 



L X J. J 

Each of the three routines is requesting an 
amount of work area. Routine A wants 2 
double words and 4 full words. Routine B 
wants 5 double words and 10 full words - 
Routine C wants U half words. At the time 
these routines are brought into storage the 
sum of the individual lengths will be 
placed in the location of the CXD 
instruction labeled OMEGA. Routine A can 
then allocate the amount of storage that is 
specified in the CXD location. 



COM — DEFINE BLANK COMMON CONTROL SECTION 

The COM assembler instruction identifies 
and reserves a common area of storage that 
may be referred to by independent assem- 
blies that have been linked and loaded for 
execution as one overall program. 

Appearances of a COM statement after the 
initial one indicate the resumption of the 
blank coiranon control section. 

When several assemblies are loaded, each 
designating a common control section, the 
amount of storage reserved is equal to the 
longest common control section. The format 
is: 



I Name 



Operation i Operand 



I A se- 
I quence | 
I symbol or I 
I blank I 
I 1. 



COM 



Blank 



The common area may be broken up into 
subfields through use of the DS and DC 
assembler instructions. Names of subfields 
are defined relative to the beginning of 
the common section, as in the DSECT control 
section. 

It is necessary to establish address- 
ability relative to a named statement with- 
in COM since the COM statement itself can- 
not have a name. In the following example, 
addressability to the common area of stor- 
age is established relative to the named 
statement XYZ. 



1 Name i Operation i Operand i 
1 _ L l_ -- - - -- -1 


I [ L j 1,=A(XYZ) j 
1 1 USING 1 XYZ,1 1 
1 1 MVC 1 PDQ(16) ,=4C'ABCD' | 

1 1 COM 1 1 
{ XYZ j DS 1 16F j 
1 PDQ 1 DS 1 16C 1 



No instructions or constants appearing 
in a common control section are assembled. 
Data can only be placed in a common control 
section through execution of the program. 
A blank common control section may include 
any assembler language instructions. 

If the assignment, of common storage is 
done in the same manner by each independent 
assembly, reference to a location in common 
by any assembly results in the same loca- 
tion being referenced. When the blank 
common control section is assembled, the 
initial value of the location counter is 
set to zero. 



SYMBOLIC LINKAGES 

Symbols may be defined in one module 
and referred to in another, thus effecting 
symbolic linkages between independently 
assembled program sections. The linkages 
can be effected only if the assembler is 
able to provide information about the 
linkage symbols to the linkage editor, 
which resolves these linkage references at 
load time. The assembler places the 
necessary information in the external 
symbol dictionary on the basis of the 
linkage symbols identified by e.g., the 
ENTRY and EXTRN instructions. Note that 
these symbolic linkages are described as 
linkages between independent modules; 
more specifically, they are linkages 
between independently assembled control 
sections. 

In the module where the linkage symbol 
is defined (i.e., used as a name), it must 
also be identified to the assembler by 
means of the ENTRY assembler instruction 
unless the symbol is the name of a CSECT 
or START statement. It is identified as 
a symbol that names an entry point, which 
means that another module may use that 
symbol in order to effect a branch op- 
eration or a data reference. The assembler 
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Addressing External Control Sections 



A common way for a program to link to an 
external control section is to: 



1. Create a V-type address constant with 
the name of the external symbol. 

2. Load the constant into a general reg- 
ister and branch to the control sec- 
tion via the register. 



The total number of control sections, 
dummy sections, external symbols and exter- 
nal dummy sections must not exceed 255. 
Certain constants may cause a symbol to be 
counted twice: external symbols in V-type 
address constants (unless they are expli- 
citly defined in an EXTRN or WXTRN state- 
ment) , and external dummy sections im- 
plicitly defined by Q-type address constants 
and corresponding DSECT statements. (EXTRN 
and WXTRN statements are discussed in this 
section; V-type constants in Section 5 
under the DC assembler instruction.) 



For example, to link to the control 
section named SINE, the following coding 
might be used: 



I Name 
j. 



i Operation j Operand 



IMAINPROG 


1 CSECT 


1 BEGIN 


|BALR 




1 USING 
1 . 




1 . 




|BALR 
1 . 


|VCON 


1 . 

JDC 




I END 



4- 
I 

|2,0 
I*, 2 



j 3 , VCON 
|1,3 



|V(SINE) 
I BEGIN 



An external symbol naming data may be 
referred to as follows: 

1. Identify the external symbol with the 
EXTRN instruction, and create an 
address constant from the symbol. 

2. Load the constant into a general reg- 
ister, and use the register for base 
addressing. 

For example, to add to register 3 the 
contents of a data area named RATETBL, which 
is in another control section, the following 
coding might be used: 



Name 



.^ ^ 

I Operation | Operand 



|._ 1 -I- ^ 



MAINPROG 
BEGIN 



CSECT 

BALR 

USING 



2,0 
*,2 



WXTRN — IDENTIFY WEAK EXTERNAL SYMBOL 



The WXTRN statement has the same format as 
the EXTRN statement. It is used to identify 
weak external references. The only differ- 
ence between a weak (WXTRN) and a strong 
(EXTRN or V-type constant) external refer- 
ence is that the automatic library call 
mechanism of the linkage editor or loader 
is not effective for symbols that are identi- 
fied in WXTRN statements. 



The automatic library call mechanism 
searches the call library for any unresolved 
external references. If it finds any of 
these references, it includes the module 
where the reference occurs in the load 
module produced by the linkage editor or 
loader. Refer to OS Loader and Linkage 
Editor for a full description of the 
automatic library call mechanism. 

The format of the WXTRN instruction is: 



Name i Operation i Operand 

1 1 

A se- I WXTRN I One or more relocatable 

quence j {symbols, separated by 

symbol [ i commas 

or I I 

blank ! ! 



I EXTRN 



I RATETBL 



RATEADDR 



L 

USING 

A 



DC 
END 



4 , RATEADDR 
RATETBL, 4 
3 , RATETBL 



I A (RATETBL) 
BEGIN 



L X J. J 



Note: If a V-type address constant is 
identified by a WXTRN instruction, the 
automatic library call mechanism is 
suppressed for it. 
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places this information in the control 
dictionary. 

Similarly, the module that uses a sym- 
bol defined in some other module must 
identify it by the EXTRN or WXTRN assembler 
instruction. It is identified as an 
externally defined symbol (i.e., defined in 
another module) that is used to effect 
linkage to the point of definition. The 
assembler places this information in the 
external symbol dictionary. 

Another way to obtain symbolic linkages, 
is by using the V-type address constant. 
The subsection "Data Definition 
Instructions" in Section 5 contains the 
details pertinent to writing a V-type 
address constant. It is sufficient here to 
note that this constant may be considered 
an indirect linkage point. It is created 
from an externally defined symbol, but that 
symbol does not have to be identified by an 
EXTRN or WXTRN statement. The V-type 
address constant may be used for external 
branch references (i.e., for effecting 
branches to other programs) . It may not be 
used for external data references (i.e., 
for referring to data in other programs) . 

ENTRY — IDENTIFY ENTRY-POINT SYMBOL 



The ENTRY instruction identifies linkage 
symbols that are defined in one source 
module and referenced by other modules . 



Name j Operation j Operand 



h 



1 A se- 1 ENTRY 


|One or more reloca- | 


1 quence | 


1 table symbols,, | 


1 symbol | 


[separated by | 


1 or 1 


1 commas, that also | 


1 blank j 


1 appear as state- | 


1 1 


|ment names | 


L _J. 


X J 



A source module may contain a maximum of 
100 ENTRY symbols. ENTRY symbols which are 
not defined (not appearing as statement 
names) , although invalid, will also count 
towards this maximum of 100 ENTRY symbols. 

The symbols in the ENTRY operand field 
may be used as operands by other programs. 
An ENTRY statement operand may not contain 
a symbol defined in a dummy section or in 
a blank common control section. The fol- 
lowing example identifies the stcitements 
named SINE and COSINE as entry points to 
the program. 



J. ^ ^ ^ 

I Name | Operation | Operand | 

^ 1 „ 1 ^ 

I I ENTRY I SINE, COSINE j 

L X X . J 



Note: Labels of START and CSECT statements 
are automatically treated as entry points 
to a module. Thus they need not be ident- 
ified by ENTRY statements. 



EXTRN — IDENTIFY EXTERNAL SYMBOL 

The EXTRN instruction identifies linkage 
symbols used by one source module but identi- 
fied in another module . Each external symbol 
must be identified. This includes symbols 
that refer to control section names. The 
format of the EXTRN statement is : 



1 Name 


Operation 


'(.Operand 


1 A se- 
j quence 
1 symbol 
1 or 
j blank 


EXTRN 


1 One or more relocatable 
j symbols, separated by 
1 commas 



The symbols in the operand field may not 
appear as the name of statements in the 
module where the EXTRN statement is. The 
length attribute of an external symbol 
is 1. 

The following example identifies three 
external symbols. They are used as operands 
in the module where they appear, but they 
are defined in some other module. 

r T T 1 

I Name | Operation ] Operand | 

^ 1 1 ^ 

I I EXTRN |RATEBL,PAYCALC | 
I I EXTRN IWITHCALC | 

t X X J 

An example that employs the EXTRN 
instruction appears subsequently under 
"Addressing External Control Sections." 

Note 1 ; A V-type address constant does 
not have to be identified by an EXTRN state- 
ment. 

Note 2 ; When external symbols are used in 
an expression they may not be paired. Each 
external symbol must be considered as having 
a unique relocatability attribute. 



28 



SECTION 4: MACHINE- INSTRUCTIONS 



This section discusses the coding of the 
machine- instructions represented in the 
assembler language. The reader is reminded 
that the functions of each machine- 
instruction are discussed in the principles 
of operation manual (see Preface). 



MACHINE- INSTRUCTION STATEMENTS 



Machine-instructions may be represented 
symbolically as assembler language 
statements. The symbolic format of each 
varies according to the actual machine- 
instruction format, of which there are 
five: RR, RX, RS , SI, and SS. Within each 
basic format, further variations are 
possible. 

The symbolic format of a machine- 
instruction is similar to, but does not 
duplicate, its actual format. Appendix C 
illustrates machine format for the five 
classes of instructions. A mnemonic opera- 
tion code is written in the operation 
field, and one or more operands are written 
in the operand field. Comments may be 
appended to a machine-instruction statement 
as previously explained in Section 1. 

Any machine-instruction statement may be 
named by a symbol, which other assembler 
statements can use as an operand. The 
value attribute of the symbol is the 
address of the leftmost byte assigned to 
the assembled instruction. The length 
attribute of the symbol depends on the 
basic instruction format, as follows: 



Basic Format 

RR 

RX 

RS 

S 

SI 

SS 



Length Attribute 
2 

4 
4 
4 
4 
6 



Instruction Alignment and Checking 



All machine-instructions are aligned 
automatically by the assembler on half-word 
boundaries. If any statement that causes 
information to be assembled requires align- 
ment, the bytes skipped are filled with 
hexadecimal zeros. All expressions that 
specify storage addresses are checked to 
ensure that they refer to appropriate 
boundaries for the instructions in which 



they are used. Register numbers are also 
checked to make sure that they specify the 
proper registers, as follows: 

1. Floating-point instructions must spec- 
ify floating-point registers 0, 2, 4, 
or 6 , 

2. Double-shift, full-word multiply, and 
divide instructions must specify an 
even-numbered general register in the 
first operand. 



OPERAND FIELDS AND SUBFIELDS 



Some symbolic operands are written as a 
single field, and other operands are writ- 
ten as a field followed by one or two 
subfields. For example, addresses consist 
of the contents of a base register and a 
displacement. An operand that specifies a 
base and displacement is written as a 
displacement field followed by a base reg- 
ister subfield, as follows: 40(5). In the 
RX format, both an index register subfield 
and a base register subfield are written as 
follows: 40(3,5). In the SS format, both a 
length subfield and a base register sub- 
field are written as follows: 40(21,5). 

Appendix C shows two types of addressing 
formats for RX, RS, SI, and SS instruc- 
tions. In each case, the first type shows 
the method of specifying an address expli- 
citly,, as a base register and displacement. 
The second type indicates how to specify an 
implied address as an expression. 

For example, a load multiple instruction 
(RS format) may have either of the follow- 
ing symbolic operands: 



R1,R3,D2(B2) 
R1,,R3,S2 



explicit address 
implied address 



Whereas D2 and B2 must be represented by 
absolute expressions, S2 may be represented 
either by a relocatable or an absolute 
expression. 



In order to use implied addresses, 
following rules must be observed: 



the 



1. The base register assembler instruc- 
tions (USING and DROP) must be used. 

2. An explicit base register designation 
must not accompany the implied 
address. 
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For example, assume that FIELD is a 
relocatable symbol, which has been assigned 
a value of 7400. Assume also that the 
assembler has been notified (by a USING 
instruction) that general register 12 cur- 
rently contains a relocatable value of 4096 
and is available as a base register. The 
following example shows a machine- 
instruction statement as it would be 
written in assembler language and as it 
would be assembled. Note that the value of 
D2 is the difference between 7400 and 4096 
and that X2 is assembled as zero, since it 
was omitted. The assembled instruction is 
presented in hexadecimal: 

Assembler statement: 

ST 4, FIELD 

Assembled instruction: 



Op. Code 


Rl 


X2 


B2 


D2 


50 


4 





C 


CE8 



An address may be specified explicitly 
as a base register and displacement (and 
index register for RX instructions) by the 
formats shown in the first column of Table 
4-1. The address may be specified as an 
implied address by the formats shown in the 
second column. Observe that the two stor- 
age addresses required by the SS instruc- 
tions are presented separately; an implied 
address may be used for one, while an 
explicit address is used for the other. 

Table 4-1. Address Specification Details 

r~ T T 1 

I Type I Explicit Address] Implied Address | 



1 RX 


1D2(X2,B2) 


1 S2(X2) 






1D2(,B2) 


1 S2 




1 RS 


|D2(B2) 


1 S2 




1 SI 


|D1(B1) 


1 SI 




1 SS 


|D1(L1,B1) 


1 Sl(Ll) 






|D1(L,B1) 


1 Sl(L) 






1D2(L2,B2) 


1 S2(L2) 




1 


. J- 


i 


J 



A comma must separate operands. Paren- 
theses must enclose a subfield or sub- 
fields, and a comma must separate two 
subfields within parentheses. When paren- 
theses are used to enclose one subfield, 
and the subfield is omitted, the parenthe- 
ses must be omitted. In the case of two 
subfields that, are separated by a comma and 
enclosed by parentheses, the following 
rules apply: 

1. If both subfields are omitted, the 
separating comma and the parentheses 
must also be omitted. 



2. If the first subfield in the sequence 
is omitted, the comma that separates 
it from the second subfield is writ- 
ten. The parentheses must also be 
written. 



MVC 32(16,5),FIELD2 

MVC 32(,5),FIELD2 (implied length) 

If the second subfield in the sequence 
is omitted, the comma that separates 
it from the first subfield must be 
omitted. The parentheses must be 
written. 



MVC 32(16,5),FIELD2 
MVC FIELD1(16) -FIELD2 



(implied 
address) 



Fields and subfields in a symbolic oper- 
and may be represented either by absolute 
or by relocatable expressions, depending on 
what the field requires. (An expression 
has been defined as consisting of one term 
or a series of arithmetically combined 
terms.) Refer to Appendix C for a detailed 
description of field requirements. 



Note: Blanks may not appear in an operand 
unless provided by a character self- 
defining term or a character literal. 
Thus, blanks may not intervene between 
fields and the comma separators, between 
parentheses and fields, etc. 



2,48(4,5) 
2, FIELD 



(implied address) 



LENGTHS — EXPLICIT AND IMPLIED 



The length field in SS instructions can 
be explicit or implied. To imply a length, 
the programmer omits a length field from 
the operand. The omission indicates that 
the length field is either of the 
following: 

1. The length attribute of the expression 
specifying the displacement, if an 
explicit base and displacement have 
been written. 

2. The length attribute of the expression 
specifying the effective address, if 
the base and displacement have been 
implied. 

In either case, the length attribute for 
an expression is the length of the leftmost 
term in the expression. The value of L'* 
is the length of the instruction in all 
non-literal machine instruction operands 
and in the CCW assembler instruction. In 
all other uses its value will be 1. 



30 



By contrast, an explicit length is writ- 
ten by the programmer in the operand as an 
absolute expression. The explicit length 
overrides any implied length. 

Whether the length is explicit or 
implied, it is always an effective length. 
The value inserted into the length field of 
the assembled instruction is one less than 
the effective length in the machine- 
instruction statement. 

Note: If a length field of zero is 
desired, the length may be stated as zero 
or one. 

To summarize, the length required in an 
SS instruction may be specified explicitly 
by the formats shown in the first column of 
Table 4-2 or may be implied by the formats 
shown in the second column. Observe that 
the two lengths required in one of the SS 
instruction formats are presented separate- 
ly. An implied length may be used for one, 
while an explicit length is used for the 
other. 



Table 4-2. Details of Length Specification 
in SS Instructions 



i Explicit Length j Implied Length 
|. + 



1 D1(L1,B1) 


D1(,B1) 


1 Sl(Ll) 


SI 


1 D1(L,B1) 


D1(,B1) 


1 Sl(L) 


SI 


1 D2(L2„B2) 


D2(,B2) 


1 S2(L2) 


S2 



MACHINE- INSTRUCTION MNEMONIC CODES 



data types in the DC assembler instruction 
(see Section 5). Furthermore, letters U 
and W have been added to indicate short and 
long, unnormalized floating-point opera- 
tions, respectively. For example, AE indi- 
cates Add Normalized Short, whereas AU 
indicates Add Unnormalized Short. Where 
applicable, full-word fixed-point data is 
implied if the data type is omitted. 



The letters R and I are added to the 
codes to indicate, respectively, RR and SI 
machine instruction formats. Thus, AER 
indicates Add Normalized Short in the RR 
format. Functions involving character and 
decimal data types imply the SS format. 



MACHINE- INSTRUCTION EXAMPLES 



The examples that follow are grouped 
according to machine-instruction format. 
They illustrate the various symbolic oper- 
and formats. All symbols employed in the 
examples must be assumed to be defined 
elsewhere in the same assembly. All sym- 
bols that specify register numbers and 
lengths must be assumed to be equated 
elsewhere to absolute values. 

Implied addressing, control section 
addressing, and the function of the USING 
assembler instruction are not considered 
here. For discussion of these considera- 
tions and for examples of coding sequences 
that illustrate them, the reader is 
referred to Section 3, "Program Sectioning 
and Linking" and "Base Register Instruc- 
tions . " 



The m.nemonic operation codes (shown in 
Appendix D) are designed to be easily 
remembered codes that indicate the func- 
tions of the instructions. The normal 
format of the code is shown below; the 
items in brackets are not necessarily pre- 
sent in all codes : 

VerbCModif ier] [Data Type] [Machine Format] 

The verb, which is usually one or two 
characters, specifies the function. For 
example, A represents Add , and MV rep- 
resents Move. The function may be further 
defined by a modifier. For example, the 
modifier L indicates a logical function, as 
in AL for Add Logical. 

Mnemonic codes for functions involving 
data usually indicate the data types by 
letters that correspond to those for the 



RR Format 



r T T 

I Name | Operation [Operand 



lALPHAl 


|LR 


|1,2 


IALPHA2 


|LR 


|REG1,REG2 


IBETA 


|SPM 


115 


1 GAMMAl 


|SVC 


1 250 


IGAMMA2 


|SVC 


|TEN 


L 


_i 


X 



The operands of ALPHAl, BETA, and GAMMAl 
are decimal self -defining values, which are 
categorized as absolute expressions. The 
operands of ALPHA2 and GAMMA2 are symbols 
that are equated elsewhere to absolute 
values. 
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RX Format 



S Format 



Name 


1 Operation 

1 
± 


1 Operand 
I 




T 


t 


ALPHAl 


|L 


|1, 39(4, 10) 


ALPHA2 


|L 


|REG1,39(4,TEN) 


BETAl 


|L 


|2,ZETA(U) 


BETA2 


|L 


|REG2,ZETA(REG4) 


GAMMAl 


|L 


I 2 , ZETA 


GAMMA2 


IL 


1 REG2 , ZETA 


GAMMAS 


|L 


|2,=F'1000' 


LAMBDAl 


|L 


|3,20(,5) 



Both ALPHA instructions specify explicit 
addresses; REGl and TEN are absolute sym- 
bols. Both BETA instructions specify 
implied addresses, and both use index reg- 
isters. Indexing is omitted from the GAMMA 
instructions. GAMMAl and GAMMA2 specify 
implied addresses. The second operand of 
GAMMA3 is a literal. LAMBDAl specifies no 
indexing. 



Name 



GAMMAl 
GAMMA2 
GAMMA 3 
GAMMA4 



Operation j Operand 



SIO 
SIO 
SIO 
SIO 



40(9) 
0(9) 
40(0) 
ZETA 



The GAMMAl, GAMMA2 and GAMMA3 instructions 
specify explicit addresses. The GAMMA4 in- 
struction specifies an implied address. The 
GAMMA2 instruction specifies af displacement 
of zero. The GAMMA3 instruction does not 
specify a base register. 



SS Format 



RS Format 



J.. ^ J. 

I Name [Operation | Operand 



y- 



1 ALPHAl 


|BXH 


11,2,20(14) 1 


1 ALPHA2 


|BXH 


|REG1,REG2, 20(REGD) | 


1 ALPHA3 


jBXH 


1 REGl , REG2 , ZETA | 


1 ALPHA4 


|SLL 


|REG2,15 1 


1 ALPHAS 


|SLL 


|REG2,0(15) 1 


L 


_X 


J. J 



Whereas AIjPHAI and ALPHA2 specify ex- 
plicit addresses, ALPHA3 specifies an 
implied address. ALPHA4 is a shift 
instruction shifting the contents of REG2 
left 15 bit positions. ALPHAS is a shift 
instruction shifting the contents of REG2 
left by the value contained in general 
register IS. 



r 

I Name 



■T T 

I Operation | Operand 



1 ALPHAl 


|AP 


|40(9,8),30(6,7) | 


iALPHA2 


|AP 


|40 (NINE, REGS) ,30(L6,7) [ 


1 ALP HA 3 


|AP 


|FIELD2,FIELD1 | 


IALPHA4 


|AP 


|FIELD2(9) ,FIELD1(6) | 


[BETA 


|AP 


|FIELD2(9) ,FIELD1 | 


1 GAMMAl 


|MVC 


|40(9,8),30(7) 1 


1 GAMMA2 


|MVC 


140 (NINE, REGS) , DEC (7) | 


1 GAMMA 3 


|MVC 


|FIELD2,FIELD1 | 


1 GAMMAS 


|MVC 


|FIELD2(9) ,FIELD1 | 


L 


_x 


X _J 



ALPHAl, ALPHA2, GAMMAl, and GAMMA2 spec- 
ify explicit lengths and addresses. ALPHA3 
and GAMMA3 specify both implied length and 
implied addresses. ALPHA4 and GAMMA4 spec- 
ify explicit length and implied addresses. 
BETA specifies an explicit length for 
FIELD2 and an implied length for FIELDl; 
both addresses are implied. 



SI Format 



I Name 
|. 

I ALPHAl 
I ALPHA2 
I BETAl 
I BETA2 



Operation j Operand 



|CLI 
JCLI 
JCLI 
|CH 



I 40(9) ,X"40' 
|40(REG9) ,TEN 
I ZETA, TEN 
I ZETA, C A' 



The ALPHA instructions specify explicit 
addresses, whereas the BETA instructions 
specify implied addresses. 



EXTENDED MNEMONIC CODES 



For the convenience of the programmer, 
the assembler provides extended mnemonic 
codes, which allow conditional branches to 
be specified mnemonically as well as 
through the use of the EC machine- 
instruction. These extended mnemonic codes 
specify both the machine branch instruction 
and the condition on which the branch is to 
occur. The codes are not part of the 
universal set of machine-instructions, but 
are translated by the assembler into the 
corresponding operation and condition 
combinations . 
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The allowable extended mnemonic codes 
and their operand formats are shown in 
Figure 4-1, together with their machine- 
instruction equivalents. Unless otherwise 
noted, all extended mnemonics shown are for 
instructions in the RX format. Note that 
the only difference between the operand 
fields of the extended mnemonics and those 
of their machine-instruction equivalents is 
the absence of the Rl field and the comma 
that separates it from the rest of the 
operand field. The extended mnemonic list, 
like the machine-instruction list, shows 
explicit address formats only. Each 
address can also be specified as an implied 
address. 
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Extended Code 



Meaning 

Branch Unconditional 

Branch Unconditional (RR format) 

No Operation 

No Operation (RR format) 

Compare Instructions 

Branch on High 
Branch on Low 
Branch on Equal 
Branch on Not High 
Branch on Not Low 
Branch on Not Equal 

Arithmetic Instructions 

Branch on Overflow 
Branch on Plus 
Branch on Minus 
Branch on Zero 
Branch on Not Plus 
Branch on Not Minus 
Branch on Not Zero 



Used After Test Under Mask Instructions 



B 


D2(X2,B2) 


BR 


R2 


NOP 


D2(X2,B2) 


NOPR 


R2 




used After 


BH 


D2(X2,B2) 


BL 


E)2<X2,B2) 


BE 


D2(X2,B2) 


BNH 


D2(X2,B2) 


BNL 


D2(X2,B2) 


BNE 


D2(X2,B2) 




Used After 


BO 


D2 (X2,B2) 


BP 


D2(X2,B2) 


BM 


D2(X2,B2) 


BZ 


D2(X2,B2) 


BNP 


D2(X2,B2) 


BNM 


D2(X2,B2) 


BNZ 


D2(X2,B2) 



BO D2(X2,B2) 

BM D2(X2,B2) 

BZ D2(X2,B2) 

BNO D2(X2,B2) 



Branch if Ones 
Branch if Mixed 
Branch if Zeros 
Branch if Not Ones 



Machine- Instruction 

BC 15,D2(X2,B2) 
BCR 15, R2 
BC 0,D2(X2,B2) 
BCR 0,R2 



BC 2,D2(X2,B2) 
BC 4,D2(X2,B2) 
BC 8,D2(X2,B2) 
BC 13,D2(X2,B2) 
BC 11,D2(X2,B2) 
BC 7,D2(X2,B2) 



BC 1,D2{X2,B2) 
BC 2,D2(X2,B2) 
BC 4,D2(X2,B2) 
BC 8,D2{X2,B2) 
BC 13,D2(X2,B2) 
BC 11,D2(X2,B2) 
BC 7,D2(X2,B2) 



BC 1,D2{X2,B2) 
BC 4,D2(X2,B2) 
BC 8,D2(X2,B2) 
BC 14,D2(X2,B2) 



Figure 4-1. Extended Mnemonic Codes 



In the following examples, which illus- 
trate the use of extended mnemonics, it is 
to be assumed that the symbol GO is defined 
elsewhere in the program. 



r T 

I Name | Operation 



B 

B 

BL 

BL 

BR 



I Operand 
4 

140(3,6) 
|U0(,6) 
|G0(3) 
I GO 

|4 
-X 



The first two instructions 
unconditional branch to 
address. The address in the 
the sum of the contents of bas 
the contents of index register 
displacement 40; the address 
instruction is not indexed, 
instruction specifies a bra 
the address implied by GO as i 
contents of index register 3; 
instruction does not specify 
ister. The last instruction i 
tional branch to the address 
register 4. 



specify an 

an explicit 

first case is 

e register 6, 

3, and the 

in the second 

The third 

nch on low to 

ndexed by the 

the fourth 

an index reg- 

s an uncondi- 

contained in 
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SECTION 5; ASSEMBLER INSTRUCTION STATEMENTS 



Just as machine instructions are used to 
request the computer to perform a sequence 
of operations during program execution 
time, so assembler instructions are 
requests to the assembler to perform cer- 
tain operations during the assembly. 
Assembler-instruction statements, in 
contrast to machine-instruction statements, 
do not usually cause machine-instructions 
to be included in the assembled program. 
Some, such as DS and DC, generate no 
instructions but do cause storage areas to 
be set aside for constants and other data- 
Others, such as EQU and SPACE, are effec- 
tive only at assembly time; they generate 
nothing in the assembled program and have 
no effect on the location counter. 



The following is a 
instructions . 



list of assembler 



Symbol Definition Instruction 
EQU - Equate Symbol 

Operation Code Definition Instruction 
OPSYN - Equate Operation Code (Assembler F 
only) 

D ata Definition Instructioqis 

DC - Define Constant 

DS - Define Storage 

CCW - Define Channel Command Word 

* Program Sectioning and Linking Instruc- 
tions 

START - Start Assembly 

CSECT - Identify Control Section 

CXD - Cumulative Length of External 

Dummy Section (Assembler F only) 
DSECT - Identify Dummy Section 
DXD - Define External Dummy Section 

(Assembler F only) 
ENTRY - Identify Entry-Point Symbol 
EXTRN - Identify External Symbol 
WXTRN - Identify Weak External Symbol 

(Assembler F only) 
COM - Identify Blank Common Control 

Section 

* Ba se Register Instructions 
USING - Use Base Address Register 
DROP - Drop Base Address Register 
Li sting Control Instructions 
TITLE - Identify Assembly Output 
EJECT - Start New Page 

SPACE - Space Listing 
PRINT - Print Optional Data 

Program Control Instructions 
ICTL - Input Format Control 
ISEQ - Input Sequence Checking 

* Discussed in Section 3. 



PUNCH - Punch a card 

REPRO - Reproduce Following Card 

ORG - Set Location Counter 

LTORG - Begin Literal Pool 

CNOP - Conditional No Operation 

COPY - Copy Predefined Source Coding 

END - End Assembly 



SYMBOL DEFINITION INSTRUCTION 

EQU — EQUATE SYMBOL 

The EQU instruction is used to define a 
symbol by assigning to it the length, 
value, and relocatability attributes of an 
expression in the operand field. The for- 
mat of the EQU instruction statement is as 
follows: 

I 1 ! 1 

I Name | Operation | Operand | 

I A variable j EQU | An | 

I symbol or j | expression | 

ordinary | j | 

symbol | j | 

I L I 1 

The expression in the operand field can 
be absolute or relocatable. Any symbols 
appearing in the expression must be pre- 
viously defined. 

The symbol in the name field is given 
the same length, value, and relocatibility 
attributes as the expression in the operand 
field. The length attribute of the symbol 
is that of the leftmost (or only) term of 
the expression. In the case of EQU to ♦ or 
to a self-defining term, the length attri- 
bute is 1. The value attribute of the 
symbol is the value of the expression. 

The EQU instruction is used to equate 
symbols to register numbers , immediate 
data, or other arbitrary values. The 
following examples illustrate how this can 
be done : 



r T T T 

I Name | Operation [Operand | 

j. 1 1 ^ 

|REG2 I EQU 1 2 (general register) | 
|TEST JEQU I X'3F' (immediate data) | 

L X X J 



To reduce programming time, the program- 
mer can equate symbols to frequently used 
expressions and then use the symbols as 
operands in place of the expressions. 
Thus, in the statement: 
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J ^ ^ ^ 

I Name | Operation [Operand | 

J 1 1 ^ 

III i 

I FIELD |EQU lALPHA-BETA+GAMMA j 

L . i X . J 



Additional information on use of the OPSYN 
instruction is contained in OS Assembler (F) 
Programmer's Guide . 



FIELD is defined as ALPHA- BET A+ GAMMA and 
may be used in place of it. Note, however, 
that ALPHA, BETA, and GAMI-JA must all be 
previously defined. If the final result of 
the expression is negative, it is treated 
as if it were positive, i.e., the low-order 
24 bits of the 2's complement is used. 

The assembler assigns a length attribute 
of 1 in an EQU to * statement. 



OPERATION CODE DEFINITION INSTRUCTION 



OPSYN 
ONLY) 



■- EQUATE OPERATION CODE (ASSEMBLER F 



The OPSYN instruction is used to define 
a machine mnemonic or extended mnemonic 
operation code as equivalent to another 
operation code. It is also used to prevent 
the assembler from recognizing an operation 
code. The OPSYN instruction has two for- 
mats; 



I Name 



jAny 
ordinary 

I symbol, 
except an 
assembler 
operation 

I code 




Operand 



A machine instruc- 
tion mnemonic code, 
an extended mnem- 
onic code, or an 
operation code de- 
fined by a previous 
OPSYN instruction 



In this format, the OPSYN instruction 
assigns all the properties of the opera- 
tion code in the operand field to the 
symbol in the name field. The symbol in 
the name field can be a previously defined 
machine or extended mnemonic operation 
code. In this case, the latest definition 
takes precedence. 

r — -T . 1— ■; 1 

I Name | Operation j Operand | 



h- 



-t- 



I A machine or | 

I extended mnem- i 
I onic operation 

I code I 



OPSYN 



I 



Blank 



In this format, the OPSYN instruction 
prevents the assembler from recognizing 
the operation code in the name field. 



Only ICTL and OPSYN instructions may precede 
an OPSYN instruction. 



DATA DEFINITION INSTRUCTIONS 



There are three data definition instruc- 
tion statements: Define Constant (DC), 
Define Storage (DS), and Define Channel 
Command Word (CCW) . 



These statements are used to enter 
data constants into storage, to define 
and reserve areas of storage, and to 
specify the contents of channel command 
words. The statements can be named by 
symbols so that other program statements 
can refer to the generated fields. The 
DC instruction is presented first and 
discussed in more detail than the DS 
instruction because the DS instruction 
is written in the same format as the 
DC instruction and can specify some or 
all of the information that the DC in- 
struction provides. Only the function 
and treatment of the statements vary. 



DC — DEFINE CONSTANT 



The DC instruction is used to provide 
constant data in storage. It can specify 
one constant or a series of constants. 
A variety of constants can be specified: 
fixed-point, floating-point, decimal, 
hexadecimal, character, and storage 
addresses. (Data constants are generally 
called constants unless they are created 
from storage addresses, in which case 
they are called address constants.) 
The format of the DC instruction state- 
ment is as follows : 



I Name 



h 



I Operation [Operand 



Any sym- | DC 
bol or I 
blank I 



I One or more 
I operands in 
I the format 
I described 
I below, each 
I separated by 
I a comma 
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Each operand consists of four subfields: 
the first three describe the constant, and 
the fourth subfield provides the nominal 
value (s) for the constant (s). The first 
and third subfields can be omitted, but the 
second and fourth must be specified. Note 
that nominal value (s) for more than one 
constant can be specified in the fourth 
subfield for most types of constants. Each 
constant so specified must be of the same 
type; the descriptive subfields that precede 
the nominal value apply to all of them. 
No blanks can occur within any of the sub- 
fields (unless provided as characters in a 
character constant or a character self- 
defining term) , nor can they occur between 
the subfields of an operand. Similarly, 
blanks cannot occur between operands and 
the commas that separate them when multiple 
operands are being specified. 

The subfields of each DC operand are 
written in the following sequence: 



1 
Dupli- 
cation 
Factor 



2 
Type 



Modifiers Nominal Value (s) 



Although the constants specified within 
one operand must have the same character- 
istics, each operand can specify a different 
type of constant. For example, in a DC 
instruction with three operands, the first 
operand might specify four decimal con- 
stants , the second a floating-point con- 
stant, and the third a character constant. 

The symbol that names the DC instruction 
is the name of the constant (or first 
constant if the instruction specifies more 
than one). Relative addressing (e.g., 
SYMBOL+2) can be used to address the var- 
ious constants if more than one has been 
specified, because the number of bytes 
allocated to each constant can be deter- 
mined. 

The value attribute of the symbol naming 
the DC instruction is the address of the 
leftmost byte (after alignment) of the 
first, or only, constant. The length 
attribute depends on two things: the type 
of constant being defined and the presence 
of a length specification. Implied lengths 
are assumed for the various constant types 
in the absence of a length specification. 
If more than one constant is defined, the 
length attribute is the length in bytes 
(specified or implied) of the first con- 
stant. 



Some constant types are only aligned to a 
byte boundary, but the DS instruction can 
be used to force any type of word boundary 
alignment for them. This is explained 
under "DS — Define Storage. " Other con- 
stants are aligned at various word boundar- 
ies (half, full, or double) in the absence 
of a length specification. If length is 
specified, no boundary alignment occurs for 
such constants. 

Bytes that must be skipped in order to 
align the field at the proper boundary are 
not considered to be part of the constant. 
In other words, the location counter is 
incremented to reflect the proper boundary 
(if any incrementing is necessary) before 
the address value is established. Thus, 
the symbol naming the constant will not 
receive a value attribute that is the 
location of a skipped byte. 

A.ny bytes skipped in aligning statements 
that do not cause information to be assem- 
bled are not zeroed. Bytes skipped to 
align a DC statement are zeroed; bytes 
skipped to align a DS statement are not 
zeroed. 

Appendix F summarizes, in chart form, 
the information concerning constants that 
is presented in this section. 



LITERAL DEFINITIONS 



The reader is remind- 
ed that the discussion of literals as 
machine-instruction operands (in Section 2) 
referred him to the description of the DC 
operand for the method of writing a literal 
operand. All subsequent operand specifi- 
cations are applicable to writing literals, 
the only differences being: 

1. The literal is preceded by an equal 
sign. 

2. Multiple operands may not be speci- 
fied. 

3. Unsigned decimal self-defining terms 
must be used to express the duplica- 
tion factor and length modifier 
values. 

4. The duplication factor may not be 
zero. 

5. S-type address constants may not be 
specified. 

6. Signed or unsigned decimal self- 
defining terms must be used to express 
scale and exponent modifiers. 

7. Q-type address constants may not be 
specified in literals. 



Boundary alignment also varies according 
to the type of constant being specified and 
the presence of a length specification. 



Examples of literals appear throughout 
the balance of the DC instruction 
discussion. 
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Code 


Type of Constant 
Character 


Machine Format 


C 


8-bit code for each character 


X 


Hexadecimal 


4-bit code for each hexadecimal digit 


B 


Binary 


binary format 


F 


Fixed-point 


Signed, fixed-point binary format; normally a full word 


H 


Fixed-point 


Signed, fixed-point binary format; normally a half word 


E 


Floating-point 


Short floating-point format; normally a full word 


D 


Floating-point 


Long floating-point format; normally a double word 


L 


Floating-point 


Extended floating-point format; normally two double words 
(Assembler F only) 


P 


Decimal 


Packed decimal format 


Z 


Decimal 


Zoned decimal format 


A 


Address 


Value of address; normally a full word 


Y 


Address 


Value of address; normally a half word 


S 


Address 


Base register and displacement value; a half word 


V 


Address 


Space reserved for external symbol addresses; each address 
normally a full word 


Q 


Address 


Space reserved for dummy section offset 
(Assembler F only) 



Figure 5-1. Type Codes for Constants 



O perand Subfield 1: Duplication Factor 



Operand Subfield 2; Type 



The duplication factor may be omitted. 
If specified, it causes the constant (s) to 
be generated the number of times indicated 
by the factor. The factor may be specified 
either by an unsigned decimal self-defining 
term or by a positive absolute expression 
that is enclosed by parentheses. The 
duplication factor is applied after the 
constant is assembled. All symbols in the 
expression must be previously defined. 

Note that a duplication factor of zero 
is permitted except in a literal and 
achieves the same result as it would in a 
DS instruction. A DC instruction with a 
zero duplication factor will not produce 
control dictionary entries. See "Forcing 
Alignment" under "DS — Define Storage." 



Note; If duplication is specified for an 
address constant containing a location 
counter reference, the value of the loca- 
tion counter used in each duplication is 
incremented by the length of the operand. 



The type subfield defines the type of 
constant being specified. From the type 
specification, the assembler determines how 
it is to interpret the constant and trans- 
late it into the appropriate machine for- 
mat. The type is specified by a single- 
letter code as shown in Figure 5-1. 

Further information about these 
constants is provided in the discussion of 
the constants themselves under "Operand 
Subfield 4: Constant." 



Operand Subfield 3; Modifiers 



Modifiers describe the length in bytes 
desired for a constant (in contrast to an 
implied length) , and the scaling and expo- 
nent for the constant. If multiple modifi- 
ers are written, they must appear in this 
sequence: length, scale, exponent. Each is 
written and used as described in the fol- 
lowing text. 
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LENGTH MODIFIER; This is written as Ln, 
where n is either an unsigned decimal self- 
defining term or a positive absolute ex- 
pression enclosed by parentheses. Any 
symbols in the expression must be previously 
defined. The value of n represents the 
number of bytes of storage that are assem- 
bled for the constant. The maximiom value 
permitted for the length modifiers supplied 
for the various types of constants is sum- 
marized in Appendix F. This table also 
indicates the implied length for each type 
of constant; the implied length is used 
unless a length modifier is present. A 
length modifier may be specified for any 
type of constant. However, no boundary 
alignment will be provided when a length 
modifier is given. 



Use of a length modifier may cause 
truncation. For example, 

DC C'ABCDXYZ' 

will generate a 7-byte constant, whereas 

DC CL6'ABCDXYZ' 

will generate a 6-byte constant and cause 
Z to be lost. Truncation of C, X, B, Z, 
A, Y, and P constants is not flagged as 
an error. However, F, H, E, D, and L 
constants will be flagged if significant 
bits are lost. Finally, each type of 
constant has an imposed or natural length 
modifier range limit. Appendix F shows 
which constants can be flagged for trunca- 
tion of significant digits. It also shows 
the allowable length modifier range for 
each constant. 



cated to fit the field. If the assembled 
length does not leave the location counter 
set at a byte boundary, and another bit 
length constant does not immediately follow 
in the same statement, the remainder of the 
last byte used is filled with zeros. This 
leaves the location counter set at the next 
byte boundary. Figure 5-2 shows a fixed- 
point constant with a specified bit-length 
of 13, as coded, and as it would appear in 
storage. Note that the constant has been 
padded on the left to bring it to its 
designated 13-bit length. 

As coded: 



, j 1 

Name i Operation ' Operand 
I ^1 



BLCON i DC 
I I 



FL.13'579' 



In storage: 
byte byte byte 
padding 
0001001000011000 



579 



Figure 5-2. 



fill 



Bit-Length Specification 
(Single Constant) 



The implied length of BLCON is two 
bytes. A reference to BLCON would cause 
the entire two bytes to be referenced. 



Bit-Length Specification; The length of a 
constant, in bits, is specified by L.n, 
where n is specified as stated above and 
represents the number of bits in storage 
into which the constant is to be assembled. 
The value of n may exceed eight and is 
interpreted to mean an integral number of 
bytes plus so many bits. For example, L.20 
is interpreted as a length of two bytes 
plus four bits. 

Assembly of the first or only constant 
with bit-length specification starts on a 
byte boundary. The constant is placed in 
the high or low order end of the field 
depending on the type of constant being 
specified. The constant is padded or trun- 



When bit-length specification is used 
in association with multiple constants 
(see Operand Subfield 4; Constant 
following) , each succeeding constant in 
the list is assembled starting at the 
next available bit. Figure 5-3 illustrates 
this . 



As coded; 



Name 



BLMCON 



Operation 



DC 



Operand 



FL.10'161,21,57' 
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In storage: 

byte byte 



byte 



padding 



padding 



QOlOlOOOpiOOOOOl 

V ^ /v. 

161 



byte 
paddiag 



byte 



OlOlOOOOllllOOlOO 

-V— '^ V '^W 

21 57 fill 



Figure 5-3. Bit-Length Specification 
(Multiple Constants) 



The symbol used as a name entry in a DC 
assembler instruction takes on the length 
attribute of the first constant in the 
list; therefore the implied length of 
BLMCON in Figure 5-3 is two bytes. 



If duplication is specified, filling 
occurs once at the end of the field occu- 
pied by the duplicated constant (s). 

When bit-length specification is used in 
association with multiple operands, assem- 
bly of the constant (s) in each succeeding 
operand starts at the next available bit. 
Figure 5-4 illustrates this. 

As coded: 



iMame 



BLMOCON 



Oper- 
ation 



DC 



.Operand_ 



FL.7'9' ,CL.10'AB' ,XL.14'C4 



In storage 
byte byte 
padding 
00010011 



10000011 



byte byte 
padding 
10000001 



byte 



10001000 



C4 



'fill 



A 

V 

A plus 
first two 
bits of B 



Figure 5-4. Bit-Length Specification 
(Multiple Operands) 



In Figure 5-4, three different types of 
constants have been specified, one to an 
operand. Note that the character constant 
' AB ' which normally would occupy 16 bits is 
truncated on the right to fit the 10-bit 
field designated. Note that filling occurs 
only at the end of the field occupied by 
all the constants. 



Scale Modifier : This modifier is written 
as Sn, where n is either a decimal value or 
an absolute expression enclosed by paren- 
theses. All symbols in the expression must 
be previously defined. The decimal self- 
defining term or the parenthesized expres- 
sion may be preceded by a sign; if none 
is present, a plus sign is assumed. The 
maximum values for scale modifiers are 
summarized in Appendix F. 

A scale modifier may be used with fixed- 
point CF, H) and floating-point (E,D,L) 
constants only. It is used to specify the 

amount of internal scaling that is desired, 
as follows : 

Scale Modifier for Fixed-Point Constants: 
the scale modifier specifies the power of 
two by which the constant must be 
multiplied after it has been converted to 
its binary representation. Just as multi- 
plication of a decimal number by a power 
of 10 causes the decimal point to move, 
multiplication of a binary number by a 
power of two causes the binary point to 
move. This multiplication has the effect 
of moving the binary point away from its 
assumed position in the binary field; the 
assumed position being to the right of the 
rightmost position. 

Thus, the scale modifier indicates 
either of the following: (1) the niimber of 
binary positions to be occupied by the 
fractional portion of the binary number, 
or (2) the number of binary positions to 
be deleted from the integral portion of 
the binary number. A positive scale of x 
shifts the integral portion of the number 
X binary positions to the left, thereby 
reserving the rightmost x binary positions 
for the fractional portion. A negative 
scale shifts the integral portion of the 
number right, thereby deleting rightmost 
integral positions. If a scale modifier 
does not accompany a fixed-point constant 
containing a fractional part, the fraction- 
al part is lost. 

In all cases where positions are lost 
because of scaling (or the lack of 
scaling), rounding occurs in the leftmost 
bit of the lost portion. The rounding is 
reflected in the rightmost position saved. 

Sca l e Modi fier fo r Floating-Point Con- 
stants ; Only a positive scale modifier may 
be used with a floating-point constant. It 
indicates the number of hexadecimal posi- 
tions that the fraction is to be shifted to 
the right. Note that this shift amount is 
in terms of hexadecimal positions, each of 
which is four binary positions. (A posi- 
tive scaling actually indicates that the 
point is to be moved to the left. However^ 
a floating-point constant is always con- 
verted to a fraction, which is hexadeci- 
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mally normalized. The point is assumed to 
be at the left of the leftmost position in 
the field. Since the point cannot be moved 
left, the fraction is shifted right.) 

Thus, scaling that is specified for a 
floating-point constant provides an assem- 
bled fraction that is unnormalized, i.e., 
contains hexadecimal zeros in the leftmost 
positions of the fraction. When the frac- 
tion is shifted, the exponent is adjusted 
accordingly to retain the correct magni- 
tude. When hexadecimal positions are lost, 
rounding occurs in the leftmost hexadecimal 
position of the lost portion. The rounding 
is reflected in the rightmost hexadecimal 
position saved. 

EXPONENT MODIFIER; This modifier is writ- 
ten as En, where n is either a decimal 
self-defining term or an absolute expres- 
sion enclosed by parentheses. Any symbols 
in the expression must be previously 
defined. The decimal value or the paren- 
thesized expression may be preceded by a 
sign; if none is present, a plus sign is 
assumed. 



An exponent modifier may be used with 
fixed-point (F, H) and floating-point 
(E,D,L) constants only. The modifier 
denotes the power of 10 by which the 
constant is to be multiplied before its 
conversion to the proper internal format. 

This modifier is not to be confused with 
the exponent of the constant itself, which 
is specified as part of the constant and is 
explained under "Operand Subfield 4: Con- 
stant." The exponent modifier affects each 
constant in the operand, whereas the expo- 
nent written as part of the constant only 
pertains to that constant. Thus, a con- 
stant may be specified with an exponent of 
+2, and an exponent modifier of +5 may 
precede the constant. In effect, the con- 
stant has an exponent of +7. 

The range for the exponent modifier is 
-85 through +75. However, if there is an 
exponent in the constant itself (see "Float- 
ing-Point Constants — E, D, and L" under 
"Operand Subfield 4: Constant") the sum of 
that exponent and the exponent modifier 
must be within the range -85 - +75. Thus, 
an exponent modifier of -40 together with 
an exponent of -47 would not be permitted. 



One further limitation is that the value 
specified must be contained in the 
implied length of the constant. Refer 
to "Floating Point Arithmetic" in 
IBM System/360 Principles of Operation . 



Operand Subfield 4; Constant 

This subfield supplies the constant (or 
constants) described by the subfields that 
precede it. A data constant (any type 
except A, Y, S, Q and V) is enclosed by 
apostrophes. An address constant (type A, 
Y, S, Q, or V) is enclosed by parentheses. 
To specify two or more constants in the 
subfield, the constants must be separated 
by commas and the entire sequence of con- 
stants must be enclosed by the appropriate 
delimiters (i.e., apostrophes or 
parentheses) . Thus, the format for speci- 
fying the constant (s) is one of the follow- 
ing: 

Single Multiple 

Constant Constants* 

• constant ' ' constant, , constant ' 

( constant) ( constant, , constant) 

* Not permitted for character, hexadecimal, 
and binary constants. 

All constant types except character (C) , 
hexadecimal (X), binary (B) , packed decimal 
(P) , and zoned decimal (Z), are aligned on 
the proper boundary, as shown in Appendix 
F, unless a length modifier is specified. 
In the presence of a length modifier, no 
boundary alignment is performed. If an 
operand specifies more than one constant, 
any necessary alignment applies to the 
first constant only. Thus, for an operand 
that provides five full-word constants, the 
first would be aligned on a full-word 
boundary, and the rest would automatically 
fall on full-word boundaries. 

The total storage requirement of an 
operand is the product of the length times 
the number of constants in the operand 
times the duplication factor (if present) 
plus any bytes skipped for boundary align- 
ment of the first constant. If more than 
one operand is present, the storage 
requirement is derived by summing the 
requirements for each operand. 
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If an address constant contains a loca- 
tion counter reference, the location count- 
er value that is used is the storage 
address of the first byte the constant will 
occupy. Thus, if several address constants 
in the same instruction refer to the loca- 
tion counter, the value of the location 
counter varies froiti constant to constant. 
Similarly, if a single constant is speci- 
fied (and it is a location counter 
reference) with a duplication factor, the 
constant is duplica:ted with a varying loca- 
tion counter value. 



However,, in this next example, the 
length attribute is 15, and three blanks 
appear in storage to the right of the zero: 

r T T 1 

[Name | Operation [Operand | 

|. 1 + ^ 

[FIELD I DC JCLIS'TOTAL IS 110' | 

L J. J. J 

In the next example, the length attri- 
bute of FIELD is 12, although 13 characters 
appear in the operand. The two ampersands 
count as only one byte. 



The following text describes each of the 
constant types and provides examples. 



C haracter Constant — C; Any of the valid 
2 56 punch combinations can be designated in 
a character constant. Only one character 
constant can be specified per operand. 
Since multiple constants within an operand 
are separated by commas, an attempt to 
specify two character constants results 
in interpreting the comma separating them 
as a character. 



Special consideration must be given to 
representing apostrophes and ampersands as 
cnaracters. Each single apostrophe or 
ampersand desired as a character in the 
constant must be represented by a pair of 
apostrophes or ampersands. Only one apos- 
trophe or ampersand appears in storage. 

The maximum length of a character con- 
stant is 256 bytes. No boundary alignment 
is performed. Each character is translated 
into one Joyte. Double apostrophes or dou- 
ble ampersands count as one character. If 
no length modifier is given, the size in 
bytes of the character constant is equal to 
the number of characters in the constant. 
If a length modifier is provided, the 
result varies as follows: 

1. If the number of characters in the 
constant exceeds the specified length, 
as many rightmost bytes and/or bits as 
necessary are dropped. 

2- If the number of characters is less 
than the specified length, the excess 
rightmost bytes and/or bits are filled 
with blanks. 



In the following example, 
attribute of FIELD is 12: 



the length 



J. ^ _ J. ^ 

I Name | Operation [Operand | 

|. 1 1 ^ 

I FIELD I DC [C'TOTAL IS 110' | 

I X ± J 



r T T 1 

[Name [Operation [Operand [ 

^ 1 + ^ 

[FIELD [DC [C'TOTAL IS £610' | 

III I 

L X X J 

Note that in the next example, a length 
of four has been specified, but there are 
five characters in the constant. 

J. ^ T- T 

[Name [Operation [Operand [ 

^ 1 4- ^ 

[FIELD [DC (SCm'ABCDE' [ 

L X X J 

The generated constant would be: 

ABCDABCDABCD 

On the other hand, if the length had 
been specified as six instead of four, the 
generated constant would have been: 

ABCDE ABODE ABODE 

Note that the same constant could be 
specified as a literal. 

r T " T 1 

[Name [Operation [Operand [ 

^ 1 + 4 

I (MVC [AREA (12) ,=3CL4' ABCDE • [ 
L X X J 



Hexa d ecimal Constant — X: A hexadecimal 
constant consists of one or more of the 
hexadecimal digits, which are 0-9 and A-F. 
Only one hexadecimal constant can be speci- 
fied per operand. The maximum length of a 
hexadecimal constant is 256 bytes or 512 
hexadecimal digits when specified using an 
explicit length attribute (for example, 
HEX DC XL256'FF'). However, due to the 
assembler's syntax restriction allowing 
only two continuation lines per input state- 
ment, the maximum length of an implicitly 
specified hexadecimal operand (X'FFFFFF', 
etc.) is 176 digits when normal statement 
boundaries are used. 

Constants that contain an even number of 
hexadecimal digits are translated as one 
byte per pair of digits. If an odd number 
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of digits is specified,, the leftmost byte 
has the leftmost four bits filled with a 
hexadecimal zero, while the rightmost four 
bits contain the odd (first) digit. No 
boundary alignment is performed. 

If no length modifier is given, the 
implied length of the constant is half the 
number of hexadecimal digits in the con- 
stant (assuming that a hexadecimal zero is 
added to an odd number of digits) . If a 
length modifier is given, the constant is 
handled as follows: 



1. If the number of hexadecimal digit 
pairs exceeds the specified length, 
the necessary leftmost bits (and/or 
bytes) are dropped. 

2. If the number of hexadecimal digit 
pairs is less than the specified 
length, the necessary bits (and/or 
bytes) are added to the left and 
filled with hexadecimal zeros. 

An eight- digit hexadecimal constant pro- 
vides a convenient way to set the bit 
pattern of a full binary word. The con- 
stant in the following example would set 
the first and third bytes of a word to I's: 



r T T n 

I Name | Operation | Operand | 

^ + + ^ 

1 IDS I OF I 

I TEST I DC JX'FFOOFFOO' | 

L X ± J 



The resulting constant is 6F4E, which 
occupies the specified two bytes. It is 
duplicated three times, as requested by 
the duplication factor. If it had merely 
been specified as X'A6F4E', the resulting 
constant would have a hexadecimal zero in 
the leftmost position. 

0A6F4E0A6F4E0A6F4E 

Binary Constant — B: A binary constant is 
written using I's and O's enclosed in apos- 
trophes. Only one binary constant can be 
specified in an operand. Duplication and 
length can be specified. The maximum 
length of a binary constant is 256 bytes. 

The implied length of a binary constant 
is the number of bytes occupied by the 
constant including any padding necessary. 
Padding or truncation takes place on the 
left. The padding bit used is a 0. 

The following example shows the coding 
used to designate a binary constant. BCON 
would have a length attribute of 1. 



r T T 1 

I Name | Operation | Operand | 

|. + 1 ^ 

JBCON |DC IB'IIOIIIOI' I 

IBTRUNC I DC I BLl' 100100011' | 
|BPAD I DC I BLl '101' | 

L i X J 



BTRUNC would assemble with the 
bit truncated, as follows: 



leftmost 



The DS instruction sets the location 
counter to a full word-boundary. (See 
DS — Define Symbol. ) 

The next example uses a hexadecimal 
constant as a literal and inserts I's into 
bits 24 through 31 of register 5. 



r T T 1 

I Name | Operation | Operand | 

|. 1 + ^ 

I |IC |5,=X'FF' I 

L X X J 



00100011 

BPAD would assemble with five zeros as 
padding, as follows: 

00000101 

Fixed-Point Constants — F and H; A fixed- 
point constant is written as a decimal 
numtoer, which can be followed by a decimal 
exponent if desired. The number can be an 
integer, ^ a fraction, or a mixed numiDer 
(i.e., one with integral and fractional 
portions) . The format of the constant is 
as follows: 



In the following example, the digit A 
is dropped, because five hexadecimal 
digits are specified for a length of two 
bytes : 

r T T 1 

I Name | Operation | Operand | 

|. 1 + ^ 

I ALPHACON I DC | 3XL2 ' A6F4E ' | 

III I 

L X X J 



1. The number is written as a signed or 
unsigned decimal value. The decimal 
point can be placed before, within, or 
after the number. If it is omitted, 
the number is assumed to be an integer, 
A positive sign is assumed if an un- 
signed number is specified. Unless a 
scale modifier accompanies a mixed 
number or fraction, the fractional 
portion is lost, as explained under 
Subfield 3: Modifiers. 
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The exponent is optional. If speci- 
fied, it is written inmiediately after 
the number as En, where n is an 
optionally signed decimal self- 
defining term specifying the exponent 
of the factor 10. The exponent may be 
in the range -85 to +75. If an 
unsigned exponent is specified, a plus 
sign is assumed. The exponent causes 
the value of the constant to be 
adjusted by the power of 10 that it 
specifies before the constant is con- 
verted to its binary form. The expo- 
nent may exceed the permissible range 
for exponents, provided that the sum 
of the exponent and the exponent modi- 
fier does not exceed that range. 



The number is converted to a binary 
number, and scaling is performed if speci- 
fied. The binary number is then rounded 
and assembled into the proper field, 
according to the specified or implied 
length. The resulting number will not 
differ from the exact value by more than 
one in the last place. If the value of the 
number exceeds the length specified or 
implied, the sign is lost, the necessary 
leftmost bits are truncated to the length 
of the field, and the value is then assem- 
bled into the whole field. Any duplication 
factor that is present is applied after the 
constant is assembled. A negative number 
is carried in 2 ' s complement form. 



stant. The expression CONWKD+4 could be 
used to address the second constant (second 
word) in the field. 

^ ^ ^ ^ 

[Name | Operation [Operand | 

^ 1 1 ^ 

ICONWRD |DC |3F"658474' j 

L X ± J 

The next statement causes the generation 
of a two-byte field containing a negative 
constant. Notice that scaling has been 
specified in order to reserve six bits for 
the fractional portion of the constant. 

^ ^_- ^ ^ 

I Name [Operation [Operand | 

^ 1 1 ^ 

[HALFCON [DC |HS6'-25.46' j 

L X X J 



The next constant (3.50) is multiplied 
by 10 to the power -2 before being con- 
verted to its binary format. The scale 
modifier reserves 12 bits for the 
fractional portion. 

^ ^ ^ ^ 

[Name [Operation [Operand j 

j. 1 1 _ ^ 

[FULLCON (DC | HS12 ' 3 . 50E-2 ' [ 

L X X J 



The same constant could be specified as 
a literal: 



An implied length of f 
assumed for a full- word (.F) 
for a half-word (H) , and the 
aligned to the proper full 
word if a length is n 
However, any length up to 
eight bytes can be specif 
type of constant by a length 
which case no boundary siliqnra 



our bytes is 
and two bytes 
constant is 
-word or half- 
ot specified, 
and including 
ltd for either 
modifier, in 
ent occurs. 



Maximum and minimum values, exclusive of 
scaling, for fixed-point constants are: 



r T r 1 

I Name [Operation [Operand [ 

j. 1 _ ^ ^ 

[ [AH |7,=HS12'3.50E-2' | 

L X . X J 



The final example specifies three con- 
stants. Notice that the scale modifier 
requests four bits for the fractional por- 
tion of each constant. The four bits are 
provided whether or not the fraction 
exists . 



Lenc 


Ith 


Max 

263-1 


Min 


n 




-263 


n 




231-1 


-2 31 


2 




2^-5-1 


-215 


1 




2^-1 


-27 


.4 




2' -1 


~2^ 


.2 




2» -1 


-2* 


.1 







-1 



A field of three full-words is generated 
from the statement shown below. The loca- 
tion attribute of CONWRD is the address of 
the leftmost byte of the first word, and 
the length attribute is 4, the implied 
length for a full- word fixed- point con- 



r T r 1 

[Name [Operation [Operand [ 

j. 1_1 ^ ^ 

[THREECON [DC [ FS4 ' 10 , 25. 3 , 100 ' [ 

L X X . J 



Floatin g -Poi nt Cons tants -- E, D, an d L; A 
floating-point constant is written as a 
decimal number. As an option a decimal 
exponent may follow. The number may be an 
integer, a fraction, or a mixed number 
(i.e., one with integral and fractional 
portions) . The format of the constant is 
as follows : 
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SHORT FLOATING POINT NUMBER (E) 



s 


7 BIT 
CHARAC- 
TERISTIC 





LONG FLOATING POINT NUMBER (D) 



s 


7 BIT 
CHARAC- 
TERISTIC 


5G BIT FRACTION 


7 8 6 
EXTENDED FLOATING POINT NUMBER (L) 


S 


7 BIT 
CHARAC- 
TERISTIC 


HIGH ORDER HALF OF 
112 BIT FRACTION 


7 8 6 




LOW ORDER HALF OF 
112 BIT FRACTION 



Figure 5-5. Floating-Point External Formats 



The number is written as a signed or 
unsigned decimal value. The decimal 
point can be placed before, within, or 
after the number. If it is omitted, 
the number is assiomed to be an integer, 
A positive sign is assumed if an un- 
signed number is specified. 



2. The exponent is optional. If speci- 
fied, it is written immediately after 
the number as En, where n is an 
optionally signed decimal value speci- 
fying the exponent of the factor 10. 
If an unsigned exponent is specified, 
a plus sign is assumed. The range of 
the exponent is explained under 
"Exponent Modifier" above. 



The external format for a floating-point 
number has two parts : the portion contain- 
ing the exponent, which is sometimes called 
the characteristic, followed by the portion 
containing the fraction, which is sometimes 
called the mantissa. Therefore, the number 
specified as a floating-point constant must 
be converted to a fraction before it can be 
translated into the proper format. Figure 
5-5 shows the external format of the three 
types of floating-point constants. 

The type L constant resembles two 
contiguous type D constants . In the type 
L constant the sign of the second double 
word is the same as the sign of the first. 
The characteristic of the second double 
word is equal to the characteristic of the 



first minus 14, modulo 128. For informa- 
tion on use of the type L constant see the 
OS Assembler (F) Programmer's Guide . 

For example, the constant 27.35E2 repre- 
sents the number 27.35 times 10 to the 2nd. 
Represented as a fraction, it would be 
.2 735 times 10 to the 4th, the exponent 
having been modified to reflect the shift- 
ing of the decimal point. The exponent may 
also be affected by the presence of an 
exponent modifier, as explained under 
"Operand Subfield 3: Modifiers." Thus, the 
exponent is also altered before being 
translated into machine format. 

In machine format a floating-point number 
also has two parts, the signed exponent and 
signed fraction. The quantity expressed by 
this number is the product of the fraction 
and the number 16 raised to the power of 
the exponent. 

The exponent is translated into its binary 
equivalent in excess 64 binary notation and 
the fraction is converted to a binary num- 
ber. Scaling is performed if specified; 
if not, the fraction is normalized (leading 
hexadecimal zeros are removed) . Rounding of 
the fraction is then performed according to 
the specified or implied length, and the 
number is stored in the proper field. The 
resulting number will not differ from the 
exact value by more than one in the last 
place. Within the portion of the floating- 
point field allocated to the fraction, the 
hexadecimal point is assumed to be to the 
left of the leftmost hexadecimal digit, and 
the fraction occupies the leftmost portion 
of the field. Negative fractions are 
carried in true representation, not in the 
twos complement form. 
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An implied length of four bytes is 
assumed for a short (E) constant and eight 
bytes for a long CD) constant. An implied 
length of 16 bytes is assumed for an 
extended (L) constant. The constant is 
aligned at the proper word (E) or double 
word (D and L) boundary if a length is 
not specified. However, any length up 
to and including eight bytes (E and D) or 
16 bytes (L) can be specified by a length 
modifier. In this case, no boundary 
alignment occurs . 

Any of the following statements could be 
used to specify 46.415 as a positive, 
full-word, floating-point constant; the 
last is a machine-instruction statement 
with a literal operand. Note that the last 
two constants contain an exponent modifier. 



T T 

Name [Operation |Operand 



-+- 



I DC 
I DC 
jDC 
I DC 
I DC 
I AE 
-X 



-+ 

|E' 46.415' 
|E' 46415E-3' 
|E' +464.15E-1" 
|E' +.46415E+2' 
|EE2' .46415' 
|6,=EE2' .46415' 
-J. 



The following would each be generated as 
double-word floating-point constants. 



^ ^ ^ 

I Name | Operation [Operand 



I FLOAT I DC 

L X. 



|DE+4'+46,-3.729,+473' | 
.X J 



Decimal Constants -- P and Z 



constant is 
decimal va 
plus sign i 
may be wr 
omitted. S 
may not be 
The maximum. 
16 bytes, 
perf orii ed. 



wrxtten as 
lue. If t 
s assumed, 
itten where 
caling and 
specified f 

length of 
No word 



A decimal 

a signed or unsigned 
he sign is omitted, a 

The decimal point 
ver desired or may be 

exponent modifiers 
or decimal constants, 
a decimal constant is 
boundary alignment is 



The placement of a decimal point in the 
definition does not affect the assembly of 
the constant in any way, because, unlike 
fixed-point and floating-point constants, a 
decimal constant is not converted to its 
binary equivalent. The fact that, a decimal 
constant is an integer, a fraction, or a 
mixed number is not pertinent to its gener- 
ation. Furtherniore, the decimal point is 
not assembled into the constant. The pro- 
grammer may determine proper decimal point 
alignment either by defining his data so 
that the point is aligned or by selecting 
machine-instructions that will operate on 
the data properly (i.e., shift it for 
purposes of alignment) . 



If zoned decimal format is specified 
(Z) , each decimal digit is translated into 
one byte. Tne translation is done accord- 
ing to the character set shown in Appendix 
A. The rightmost byte contains the sign as 
well as the rightmost digit. For packed 
decimal format (P) , each pair of decimal 
digits is translated into one byte. The 
rightmost digit and the sign are translated 
into the rightmost byte. The bit configu- 
ration for the digits is identical to the 
configurations for the hexadecimal digits 
0-9 as shown in Section 3 under 
"Hexadecimal Self-Defining Value." For 
both packed and zoned decimals, a plus sign 
is translated into the hexadecimal digit C, 
and a minus sign into the digit D. 



If an even number of packed decimal 
digits is specified, one digit will be left 
unpaired because the rightm.ost digit is 
paired with the sign. Therefore, in the 
leftmost byte, the leftmost four bits will 
be set to zeros and the rightmost four bits 
will contain the odd (first) digit. 

If no length modifier is given, the 
implied length for either constant is the 
number of bytes the constant occupies 
(taking into account the format, sign, and 
possible addition of zero bits for packed 
decimals) . If a length modifier is given, 
the constant is handled as follows: 

1. If the constant requires fewer bytes 
than the length specifies, the neces- 
sary number of bytes is added to the 
left. For zoned decimal format, the 
decimal digit zero is placed in each 
added byte. For packed decimals, the 
bits of each added byte are set to 
zero. 

2. If the constant requires more bytes 
than the length specifies, the neces- 
sary number of leftmost digits or 
pairs of digits is dropped, depending 
on which format is specified. 

Examples of decimal constant definitions 
follow. 

r T ■ T 1 

I Name [Operation [Operand | 



[DC 
[DC 
[DC 
]DC 

-X 



|P'+1.25' 
|Z"-543' 
[ Z'79.68' 
|PL3'79.68' 
-X . 



The following statement specifies both 
packed and zoned decimal constants. The 
length modifier applies to each constant in 
the first operand (i.e., to each packed 
decimal constant). Note that a literal 
could not specify both operands. 
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r T T T 

I Name | Operation [Operand | 

^ 1 1 ^ 

JDECIMALS |DC | PL8' +25. 8 ,-3874 , j 

I I |+2.3',Z'+80,-3.72' | 

L X X J 



The last example illustrates the use of 
a packed decimal literal. 



r T r 1 

I Name | Operation | Operand | 

^ ^ 1 ^ 

I JUNPK |OUTAREA,=PL2'+25' j 
L J. J. J 



Address Constants ; An address constant is 
a storage address that is translated into a 
constant. Address constants can be used 
for initializing base registers to facili- 
tate the addressing of storage. Further- 
more, they provide a means of communicating 
between control sections of a multisection 
program. However, storage addressing and 
control section communication are also 
dependent on the use of the USING assembler 
instruction and the loading of registers. 
Coding examples that illustrate these con- 
siderations are provided in Section 3 using 
"Programming with the USING Instruction." 



An address constant, unlike other types 
of constants, is enclosed in parentheses. 
If two or more address constants are speci- 
fied in an operand, they are separated by 
commas, and the entire sequence is enclosed 
by parentheses. There are five types of 
address constants: A, Y, S, Q and V. A 
relocatable address constant may not be 
specified with bit lengths. 



Complex Relocatable Expressions; A complex 
relocatable expression can only be used to 
specify an A-type or Y-type address con- 
stant. These expressions contain two or 
more unpaired relocatable terms and/or 
negative relocatable terms in addition to 
any absolute or paired relocatable terms 
that may be present. A complex relocatable 
expression might consist of external sym- 
bols and designate an address in an inde- 
pendent assembly that is to be linked and 
loaded with the assembly containing the 
address constant. 



A-Type Address Constant; This constant is 
specified as an absolute, relocatable, or 
complex relocatable expression. (Remember 
that an expression may be single term or 
multiterm.) The value of the expression is 
calculated to 32 bits as explained in 
Section 2 with one exception: the maximum 



value of the expression may be 2^^-!. The 
value is then truncated on the left, if 
necessary, to the specified or implied 
length oJE the field and assembled into the 
rightmost bits of the field. The implied 
length of an A-type constant is four bytes^, 
and alignment is to a full-word boundary 
unless a length is specified, in which case 
no alignment will occur. The length that 
may be specified depends on the type of 
expression used for the constant; a length 
of . 1 to 4 bytes may be used for an 
absolute expression, while a length of only 
3 or 4 may be used for a relocatable or 
complex relocatable expression. 

In the following examples, the field 
generated from the statement named ACON 
contains four constants, each of which 
occupies four bytes. Note that there is a 
location counter reference in one. The 
value of the location counter will be the 
address of the first byte allocated to the 
fourth constant. The second statement 
shows the same set of constants specified 
as literals (i.e., address constant 
literals) . 



I Oper- I 
Name i ation i Operand 

J I . 

ACONi DC ! A(108,LOP,END-STRT,*+4096) 

I LM ! 4,7,=A(108,LOP,END-STRT,*+4096) 

4 1 



Note: Whep the location counter reference 
occurs in a literal, as in the LM instruc- 
tion above, the value of the location 
counter is the address of the first byte of 
the instruction. 



Y-Type Address Constant; A Y-type address 
constant has much in common with the A-type 
constant. It too is specified as an abso- 
lute, relocatable, or complex relocatable 
expression. The value of the expression is 
also calculated to 32 bits as explained in 
Section 2. However, the maximum value of 
the expression may be only 2^5_i. The 
value is then truncated, if necessary, to 
the specified or implied length of the 
field and assembled into the right-most 
bits of the field. The implied length of a 
Y-type constant is two bytes, and alignment 
is to a half-word boundary unless a length 
is specified, in which case no alignment 
will occur. The maximum length of a Y-type 
address constant is two bytes. If length 
specification is used, a length of two 
bytes may be designated for a relocatable 
or complex expression and . 1 to 2 bytes for 
an absolute expression. ' r^ 



>tl f'lj 



Section 5: Assembler Instruction Statements 



47 



Warning; Specification of relocatable Y- 
type address constants should be avoided in 
programs destined to be executed on 
machines having more than 32,76 7 bytes of 
storage capacity. In any case Y-type re- 
locatable address constants should not be 
used in programs to be executed under 
Operating System/360 control. 



S -Type Address Constant; 
address constant is used 
address in base-displacement form. 



The S-type 
to store an 



The 
ways ; 



constant may be specified in two 



1. 



2. 



As an absolute or relocatable 
sion, e.g., S(BETA). 



expres- 



As two absolute expressions, the first 
of which represents the displacement 
value and the second, the base reg- 
ister, e.g., S(400(13)). 



The address value represented by the 
expression in (1) will be converted by 
the assembler into the proper base register 
and displacement value. An S-type constant 
is assembled as a half word and aligned on 
a half-word boundary. The leftmost four 
bits of the assembled constant represents 
the base register designation, the remain- 
ing 12 bits the displacement value. 

If length specification is used, only 
two bytes may be specified. S-type address 
constants may not be specified as literals. 



Q -Type Address Constant (Assembler F only} : 
This constant is used to reserve storage 
for the offset of an external dummy 
section. This offset is added to the 
address of the block of storage allocated 
to external dummy sections to access the 
desired section. The constant is specified 
as a relocatable symbol which has been 
previously defined in a DXD or DSECT state- 
ment. The implied length of a Q-type 
address constant is four bytes and boundary 
alignment is to a full word; a length of 
1-4 bytes may be specified. No bit length 
specification is permitted in a Q-type 
constant. In the following example the 
constant VALUE has been previously defined 
in a DXD or DSECT statement. To access 
VALUE the value of A is added to the base 
address of the block of storage allocated 
for external dummy sections . Q-type ad- 
dress constants may not be specified in 
literals . 

r T T 1 

1 Name | Operation [Operand | 

|. 1 1 ^ 

I A I DC I Q (VALUE) | 

L JL X . J 



V- Type Address Constant: This constant is 
used to reserve storage for the address of 
an external symbol that is used for effect- 
ing branches to other programs. The con- 
stant may not be used for external data 
references within an overlay program. The 
constant is specified as one relocatable 
symbol, which need not be identified by an 
EXTRN statement. Whatever symbol is used is 
assumed to be an external symbol by virtue 
of the fact that it is supplied in a V-type 
address constant. 

To suppress the automatic library call 
mechanism of the linkage editor for a 
constant identified in a V-type address con- 
stant, the programmer can identify it in a 
WXTRN statement (Assembler F only) . 

Note that specifying a symbol as the 
operand of a V-type constant does not 
constitute a definition of the symbol for 
this assembly. The implied length of a 
V-type address constant is four bytes, and 
boundary alignment is to a full word. A 
length modifier may be used to specify a 
length of either three or four bytes, in 
which case no such boundary alignment 
occurs. In the following example, 12 bytes 
will be reserved, because there are three 
symbols. The value of each assembled con- 
stant will be zero until the program is 
loaded. It must be emphasized that a V- 
type address constant of length less than 4 
can and will be processed by the Assembler 
but cannot be handled by the Linkage Editor. 



J. ^ ^ T 

1 Name | Operation | Operand | 

|. 1 -.--I ^ 

JVCONST I DC I V (SORT, MERGE, CALC) | 
L X X J 



DS — DEFINE STORAGE 



The DS instr 
areas of storage 
those areas. T 
is the preferred 
ing storage for 
areas, etc. Th 
that can be re 
Instruction is 1 
value of the loca 



uction is used to reserve 
and to assign names to 
he use of this instruction 
way of symbolically defin- 
work areas, input/output 
e size of a storage area 
served by using the DS 
imited only by the maximum 
tion counter. 



Name 



[Operation j Operand 



j. 

I Any sym- 
I bol or 
I blank 



DS 



I One or more op- 
I erands, separated 
I by comma s , wr it- 
jten in the for- 
I mat described in 
I the following 
I text 
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The format of the DS operand is identi- 
cal to that of the DC operand; exactly the 
same subfields are employed and are written 
in exactly the same sequence as they are in 
the DC operand. Although the formats are 
identical, there are two differences in the 
specification of subfields. They are: 

1. The specification of data (subfield 4) 
is optional in a DS operand, but it is 
mandatory in a DC operand. If the 
constant is specified, it must be 
valid. 

2. The maximum length that m,ay be speci- 
fied for character (C) and hexadecimal 
(X) field types is 65,535 bytes rather 
than 256 bytes. 

If a DS operand specifies a constant in 
subfield U, and no length is specified in 
subfield 3, the assembler determines the 
length of the data and reserves the 
appropriate amount of storage. It does not 
assemble the constant. The ability to 
specify data and have the assembler calcu- 
late the storage area that would be 
required for such data is a convenience to 
the programmer. If he knows the general 
format of the data that will be placed in 
the storage area during program execution, 
all he needs to do is show it as the fourth 
subfield in a DS operand. The assembler 
then determines the correct amount of stor- 
age to be reserved, thus relieving the 
programmer of length considerations. 

If the DS instruction is named by a 
symbol, its value attribute is the location 
of the leftmost byte of the reserved area. 
The length attribute of the sym.bol is the 
length (implied or explicit) of the type of 
data specified. Should the DS have a 
series of operands, the length attribute 
for the symbol is developed from the first 
item in the first operand. Any positioning 
required for aligning the storage area to 
the proper type of boundary is done before 
the address value is determined. Bytes 
skipped for alignment are not set to zero. 



Each field type (e.g., hexadecimal, 
character, floating-point) is associated 
with certain characteristics (these are 
summarized in Appendix F) . The associated 
characteristics will determine which field- 
type code the programmer selects for the DS 
operand and what other information he adds, 
notably a length specification or a 
duplication factor. For example, the E 
floating-point field and the F fixed-point 
field both have an implied length of four 
bytes. The leftinost byte is aligned to a 
full-word boundary. Thus, either code 
could be specified if it were desired to 
reserve four bytes of storage aligned to a 
full-word boundary. To obtain a length of 
eight bytes, one could specify either the E 
or F field type with a length modifier of 
eight. However, a duplication factor would 
have to be used to reserve a larger area, 
because the maximum length specification 
for either type is eight bytes. Note also 
that specifying length would cancel any 
special boundary alignment. 



In contrast, packed 
and Z) , character (C) , 
binary (B) fields have 
one byte. Any of the 
would have to be ac 
modifier, unless just 
reserved. Although 
the use of C and X 
greater latitude in 1 
the maximum for either 
bytes. (Note that 
maximum for these type 
tion.) Unless a fi 
desired, either the le 
fied for the C, X, P, 
or else the data m.ust 
fourth subfield) , so t 
calculate the length. 



and zoned decimal (P 
hexadecimal (X) , and 
an implied length of 
se codes, if used, 
companied by a length 
one byte is to be 
no alignment occurs, 
field types permits 
ength specifications, 
type being 65,53 5 
this differs from the 
s in a DC instruc- 
eld of one byte is 
ngth must be speci- 
Z, or B field types, 
be specified (as the 
hat the assembler can 



To define four 10-byte fields and one 
100-byte field, the respective DS state- 
ments might be as follows: 
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r T T T 

I Name | Operation | Operand | 

|. 1 1 ^ 

I FIELD IDS |4CL10 | 

I AREA IDS ICLIOO | 

L- X ± J 



Although FIELD might have been specified 
as one UO-byte field, the preceding defini- 
tion has the advantage of providing FIELD 
with a length attribute of 10. This would 
be pertinent when using FIELD as an SS 
machine-instruction operand. 

Additional examples of DS statements are 
shown below: 



r T T 

I Name | Operation | Operand 



h- 



-+■ 



|ONE 
1 


DS 1 


1 

|TWO 

1 


1 
DS 1 


1 

1 THREE 

1 


DS 1 


1 

1 FOUR 
1 


DS 1 


1 

1 FIVE 

1 
1 


DS 1 



CL80(one 80-byte field, 

length attribute of 80 
80C(80 one-byte fields, 

length attribute of one 
6F(six full words, length 

attribute of four) 
D(one double word, length 

attribute of eight) 
4H(four half-words, 

length attribute of 

two) 



H 



N ote; A DS statement causes the storage 
area to be reserved but not set to zeros. 
No assumption should be made as to the 
contents of the reserved area. 



Spe cial Uses of the Duplication Factor 



F ORCING ALIGNMENT; The location counter 
can be forced to a double-word, full-word, 
or half-word boundary by using the 
appropriate field type (e.g., D, F, or H) 
with a duplication factor of zero. This 
method may be used to obtain boundary 
alignment that otherwise would not be pro- 
vided. For example, the following state- 
ments would set the location counter to the 
next double-word boundary and then reserve 
storage space for a 128-byte field (whose 
leftmost byte would be on a double-word 
boundary) . 



DEFINING FIELDS OF AN AREA; A DS instruc- 
tion with a duplication factor of zero can 
be used to assign a name to an area of 
storage without actually reserving the 
area . Additional DS and/or DC instructions 
may then be used to reserve the area and 
assign names to fields within the area (and 
generate constants if DC is used) . 

For example, assume that 8 0-character 
records are to be read into an area for 
processing and that each record has the 
following format: 



Positions 5-10 
Positions 11-30 
Positions 31-36 
Positions 47-54 
Positions 55-62 



Payroll Number 

Employee Name 

Date 

Gross Wages 

Withholding Tax 



The following example illustrates how DS 
instructions might be used to assign a name 
to the record area, then define the fields 
of the area and allocate th€? storage for 
them. Note that the first statement names 
the entire area by defining the symbol 
RDT^EA; the statement gives RDAREA a length 
attribute of 8 bytes, but does not reserve 
any storage. Similarly, the fifth state- 
ment names a six-byte area by defining the 
symbol DATE; the three subsequent state- 
ments actually define the fields of DATE 
and allocate storage for them. The second, 
ninth, and last statements are used for 
spacing purposes and, therefore, are not 
named. 



r T 

I Name | Operation 



I Operand 



f- 



1 RDAREA 


DS 


I0CL80 


1 


DS 


|CL4 


1 PAYNO 


DS 


|CL6 


|N7^E 


DS 


|CL20 


IDATE 


DS 


I0CL6 


|DAY 


DS 


|CL2 


1 MONTH 


DS 


|CL2 


lYEAR 


DS 


|CL2 


1 


DS 


ICLIO 


1 GROSS 


DS 


|CL8 


1 FEDTAX 


DS 


|CL8 


1 


DS 


|CL18 



CCW — DEFINE CHANNEL COMMAND WORD 



r T T T 

I Name {Operation | Operand | 

j. 1 1 ^ 

I IDS I CD I 

I AREA IDS ICL128 | 

L J. J. J 



The CCW instruction provides a conven- 
ient way to define and generate an eight- 
byte channel command word aligned at a 
double-word boundary. CCW will cause any 
bytes skipped to be zeroed. The internal 
machine format of a channel command word is 
shown in Table 5-1. 
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Table 5-1. Channel Command Word 

r T T 

I Byte I Bits I Usage 



ll 


1 0-7 


Command code 


\2-n 


1 8-31 


Data address 


|5 


1 32-36 


Flags 




1 37-39 


Must be zero 


|6 


1 UO-47 


Set to zero 


|7-8 


1 48-63 


Count 


L _ 


X _ x_ 



32-35 

0100 



36-39 
1000 



If there is a symbol in the name field 
of the CCW instruction, it is assigned the 
address value of the leftmost byte of the 
channel command word. The length attribute 
of the symbol is 8. 



The format 
statement is: 



of the CCW instruction 



Name 



-T T 

I Operation | Operand 



|. + + ^ 



I Any sym-ICCW 
bol or 
blank 



L 



I Four operands, 

I separated by commas, 

I specifying the con- 

j tents of the channel 

I command word in 

I the format 

I described in the 

I following text 

-X 



.X X 



J 



All four operands must appear. They are 
written, from left to right, as follows: 



An absolute expression that specifies 
the command code. This expression's 
value is right- justified in byte 1. 



An expression specifying the data 
address. This value is treated as a 
3-byte A-type constant. The value of 
this expression is in bytes 2-4. 



LISTING CONTROL INSTRUCTIONS 



The listing control instructions are 
used to identify an assembly listing and 
assembly output cards, to provide blank 
lines in an assembly listing, and to desig- 
nate how much detail is to be included in 
an assembly listing. In no case are 
instructions or constants generated in the 
object program. Listing control statements 
with the exception of PRINT are not printed 
in the listing. 

NOTE: TITLE, SPACE, and EJECT statements 
will not appear in the source listing 
unless the statement is continued onto 
another card. Then the first card of the 
statement is printed. However, any of 
these three types of statements, if 
generated as macro instruction expansion, 
will never be listed regardless of 
continuation . 



TITLE — IDENTIFY ASSEMBLY OUTPUT 



3. An absolute expression that specifies 
the flags for bits 32-36 and zeros for 
bits 37-39. The value of this expres- 
sion is right- justified in byte 5. 
(Byte 6 is set to zero.) 



4, An absolute expression that specifies 
the count. The value of this expres- 
sion is right- justified in bytes 7-8. 



The following is an example of a CCW 
statement: 



r T T 1 

I Name | Operation | Operand | 

I- + + ^ 

I I CCW I 2,READAREA,X'48' ,80 | 
L X X J 



Note that the form of the third operand 
sets bits 37-39 to zero, as required. The 
bit pattern of this operand is as follows: 



The TITLE instruction enables the pro- 
grammer to identify the assembly listing 
and assembly output cards. The format of 
the TITLE instruction statement is as fol- 
lows: 



( 

I Name 



Operation I Operand 



^ , ^ 



— 1 



Special, 
sequence 
or vari- 
able sym- 
bol or 
blank 



TITLE i A sequence of char- 
I acters , enclosed in 
I apostrophes 



The name field may contain a special 
symbol of from one to four alphabetic or 
numeric characters in any combination. The 
contents of the name field are punched into 
columns 73-76 of all the output cards for 
the program except those produced by the 
PUNCH and REPRO assembler instructions. 
Only the first TITLE statement in a program 
may have a special symbol or a variable sym- 
bol in the name field. The name field of 
all subsequent TITLE statements must contain 
either a sequence symbol or a blank. 



Section 5 
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The operand field may contain up to 100 
characters enclosed in apostrophes. Spe- 
cial consideration must be given to rep- 
resenting apostrophes and ampersands as 
characters. Each single apostrophe or 
ampersand desired as a character in the 
constant must be represented by a pair of 
apostrophes or ampers£inds. Only one apos- 
trophe or ampersand appears in storage. 
The contents of the operand field are 
printed at the top of each page of the 
assembly listing. 

A program may contain more than one 
TITLE statement. Each TITLE statement pro- 
vides the heading for pages in the assembly 
listing that follow it, until another TITLE 
statement is encountered. Each TITLE 
statement causes the listing to be advanced 
to a new page (before the heading is 
printed) . 



1 

1 Name 

1 


1 J — 

Operation | Operand 


1 ^ 

1 A se- 

1 quence 

1 symbol 

1 or blank 

1 


T 

EJECT 1 Not used; 
j blank 

1.--. 


should be 



If the line before the EJECT statement 
appears at the bottom of a page, the EJECT 
statement has no effect. Two EJECT state- 
ments may be used in succession to obtain a 
blank page. A TITLE instruction followed 
immediately by an EJECT instruction will 
produce a page with nothing but the operand 
entry (if any) of the TITLE instruction. 
Text following the EJECT instruction will 
begin at the top of the next page. 



For example, if the following statement 
is the first TITLE statement to appear in a 

program: 



SPACE -- SPACE LISTING 



r T T 1 

] Name | Operation | Operand | 

} + 1 ^ 

JPGMI I TITLE I 'FIRST HEADING' j 

I X X : J 



The SPACE instruction is used to insert 
one or more blank lines in the listing. 



The format of the SPACE instruction 
ment is as follows : 



state- 



then PGMl is punched into all of the output 
cards (columns 73-76) and this heading 

appears at the top of each subsequent page: 
PGMl FIRST HEADING. 

If the following statement occurs later 
in the same program: 



r 

I Name 
L 



T — T- 

I Operation I Operand 



1 4 



A se- 
quence 
symbol 
or blank 



SPACE 



1 



! A decimal value 



or blank 



I . 1 I 



r T- T 1 

I Name ] Operation | Operand | 

|. 1 1 ^ 

I 1 TITLE I'A NEW HEADING' j 
L __X X . J 



A decimal value is used to specify the 
number of blank lines to be inserted in the 
assembly listing. A blank operand causes 
one blank line to be inserted. If this 
value exceeds the number of lines remaining 
on the listing page, the statement will 
have the same effect as an EJECT statement. 



then, PGMl is still punched into the output 

cards, but each following page begins with 
the heading: PGMl A NEW HEADING. 

Note: The sequence number of the cards in 
the output deck is contained in columns 
77-80. 



EJECT — START NEW PAGE 



PRINT — PRINT OPTIONAL DATA 

The PRINT instruction is used to control 
printing of the assembly listing. The 
format of the PRINT instruction statement 
is: 



The EJECT instruction causes the next 
line of the listing to appear at the top of 
a new page. This instruction provides a 
convenient way to separate routines in the 
program listing. The format of the EJECT 
instruction statement is as follows: 



I 

I Name 

I 

I 



._! ^ 

I Operation I Operand 

._l i „ ; 



I A se- 
I quence 
I symbol 
I or blank 
I 



PRINT ' One to three 
operands 
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The one to three operands may include an 
operand from each of the following groups 
in any sequence : 

1. ON - A listing is printed. 
OFF - No listing is printed. 

2. GEN - All statements generated by 

macro-instructions are print- 
ed. 

NOGEN - Statements generated by macro- 
instructions are not printed 
with the exception of MNOTE 
which will print regardless of 
NOGEN. However, the macro- 
instruction itself will appear 
in the listing. 



3. DATA - Constants are printed out in 
full in the listing. 

NODATA - Only the leftmost eight bytes 
are printed on the listing. 

A program may contain any number of 
PRINT statements. A PRINT statement con- 
trols the printing of the assembly listing 
until another PRINT statement is encoun- 
tered. Each option remains in effect 
until the corresponding opposite option is 
specified. 

Until the first PRINT statement (if any) 
is encountered, the following is assumed: 



r T T 1 

I Name | Operation | Operand | 

^ 4. _ 1 4 

I I PRINT I NODATA | 

L X X J 



is the last PRINT statement to appear 
before the DC statement, only eight bytes 
of zeros are printed in the assembly list- 
ing. 

Whenever an operand is omitted, it is 
assumed to be unchanged and continues 
according to its last specification. 

The hierarchy of print control state- 
ments is: 

1. ON and OFF 

2. GEN and NOGEN 

3. DATA and NODATA 

Thus with the following statement nothing 
would be printed. 



r T T 1 

I Name | Operation | Operand | 

^ 1 + 4 

I I PRINT I OFF, DATA, GEN | 

L X X J 



r T T 1 

I Name | Operation | Operand | 

^ 1 + ^ 

I I PRINT I ON, NODATA, GEN | 

L X X J 



For example, if the statement: 



r T T 1 

I Name | Operation | Operand | 

|. + + ^ 

I IDC |XL256'00' | 

L X X J 



appears in a program,, 256 bytes of zeros 
are assembled. If the statement: 



PROGR/yd CONTROL INSTRUCTIONS 



The program control instructions are 
used to specify the end of an assembly, to 
set the location counter to a value or word 
boundary, to insert previously written cod- 
ing in the program, to specify the place- 
ment of literals in storage, to check the 
sequence of input cards, to indicate state- 
ment format, and to punch a card. Except 
for the CNOP and COPY instructions, none of 
these assembler instructions generate 
instructions or constants in the object 
program. 



r T T T 

I Name | Operation [Operand | 

|. ^ 1 4 

I I PRINT I DATA j 

L X X J 



is the last PRINT statement to appear 
before the DC statement, all 256 bytes of 
zeros are printed in the assembly listing- 
However , if : 



ICTL — INPUT FORMAT CONTROL 



The ICTL instruction allows the program- 
mer to alter the normal format of his 
source program statements. The ICTL state- 
ment must precede all other statements in 
the source program and miay be used only 
once. The format of the ICTL instruction 
statement is as follows: 
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r T T ~ 1 

I Name | Operation | Operand | 

[Blanr'jlCTL jl~3";diciial"iilf-de~"j 

fining values of the 
L i |form_b^e^c J 



The operands 1 and r, respectively, 
specify the leftmost and rightmost columns 
of the field in ^ the input cards to be 
checked. Operand r must be equal to or 
greater than operand 1. Columns to be 
checked must not be between the begin and 
end columns. 



Operand b specifies the begin column of 
the source statement. It must always be 
specified, and must be within 1-40, inclu- 
sive. Operand e specifies the end column 
of the source statement. The end column, 
when specified, must be within 41-80, in- 
clusive; when not specified, it is assumed 
to be 71. The end column must not be less 
than the begin column +5. The coliimn after 
the end column is used to indicate whether 
the next card is a continuation card. 
Operand c specifies the continue column of 
the source statement. The continue column, 
when specified, must be within 2-40 and 
must be greater than b. If the continue 
column is not specified, or if column 80 is 
specified as the end column, the assembler 
assumes that there are no continuation 
cards, and all statements are contained on 
a single card. The operand forms b,,c and 
b, are invalid. 

If no ICTL statement is used in the 
source program,, the assembler assumes that 
1, 71, and 16 are the begin, end, and 
continue columns, respectively. 



The next example designates the begin 
column as column 25. Since the end column 
is not specified, it is assumed to be 
column 71. No continuation cards are rec- 
ognized because the continue column is not 
specified. 



I ^ ^ . ^ 

I Name i Operation | Operand | 

I 1 1 ^ 

I I ICTL 1 25 I 

I X JL J 



ISEQ — INPUT SEQUENCE CHECKING 



The ISEQ instruction is used to 
check the sequence of input cards. (A 
sequence error is considered serious , but 
the assembly is not terminated.) The 
format of the ISEQ instruction statement 
is as follows: 

r T T 1 

I Name | Operation | Operand | 

feiinkjlSEQ JT^Sydicimariilf^dp j 

fining values of the 
I I xl2En!_lx£i_2£_^l§2lS j 



Sequence checking begins with the first 
card following the ISEQ statement. Compar- 
ison of adjacent cards makes use of the 
eight-bit internal collating sequence. 
(See Appendix A. ) Each card checked must 
be higher than the preceding card. 

An ISEQ statement with a blank operand 
terminates the operation. (Note that this 
ISEQ statement is also sequence checked.) 
Checking may be resumed with another ISEQ 
statement. 

Sequence checking is only performed on 
statements contained in the source program. 
Statements inserted by the COPY assembler- 
instruction or generated by a macro- 
instruction are not checked for sequence. 
Also macro-definitions in a macro library 
are not checked. 

PUNCH — PUNCH A CARD 



The PUNCH assembler- instruction causes 
the data in the operand to be punched into 
a card. One PUtJcH statement produces one 
punched card. As many PUNCH statements may 
be used as are necessary. The format is: 



r T T 

I Name | Operation | Operand 



I A se- 
I quence . 
! symbol 
or 

blank 



PUNCH |1 to 80 characters 
I enclosed in apos- 
I trophes 



.J 



Using character representation, the 
operand is written as a string of up to 80 
characters enclosed in apostrophes. All 
characters, including blank, are valid. 
The position immediately to the right of 
the left apostrophe is regarded as column 
one of the card to be punched. Substitu- 
tion is performed for variable symbols in 
the operand. Special consideration must be 
given to representing apostrophes and 
ampersands as characters. Each apostrophe 
or ampersand desired as a character in the 
constant must be represented by a pair of 
apostrophes or ampersands. Only one apos- 
trophe or ampersand appears in storage. 

PUNCH statements may occur anywhere 
within a program, except before macro defi- 
nitions. They may occur within a macro 
definition but not between the end of a 
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macro definition and the beginning of the 
next macro definition. If a PUNCH state- 
ment occurs before the first control sec- 
tion, the resultant card will precede all 
other cards in the object program card 
deck; otherwise the card will be punched in 
place. No sequence number or identifi- 
cation is punched in the card. 

REPRO — REPRODUCE FOLLOWING CARD 



The REPRO assembler-instruction causes 
data on the following statement line to be 
punched into a card. The data is not 
processed; it is punched in a card, and no 
substitution is performed for variable sym- 
bols. No sequence number or identification 
is punched on the card. One REPRO instruc- 
tion produces one punched card. The REPRO 
instruction may not appear before a macro 
definition. REPRO statements that occur 
before all statements composing the first 
or only control section will punch cards 
which precede all other cards of the object 
deck. The format is: 



Name 



Operation j Operand 



I 1 H 1 

A se- I REPRO I Blank 

quence 

symbol 
. or blank , 
J I J I 

The line to be reproduced may contain 
any combination of up to 80 valid charac- 
ters. Characters may be entered starting 
in column 1 and continuing through column 
8 of the line. Column 1 of the line 
corresponds to column 1 of the card to be 
punched. 

ORG — SET LOCATION COUNTER 



The ORG instruction is used to alter the 
setting of the location counter for the 
current control section. The format of the 
ORG instruction statement is: 



r T 

I Name | Operation 



A se- 
quence 
symbol 
or 
blank 



ORG 



j Operand 
-+ 



I A relocatable ex- 
I pression or blank 



Any symbols in the expression must have 
been previously defined. The unpaired 
relocatable symbol must be defined in the 
same control section in which the ORG 
statement appears. 



The location counter is set to the value 
of the expression in the operand. If the 
operand is omitted, the location counter is 
set to the next available (unused) location 
for that control section. 

An ORG statement cannot be used to 
specify a location below the beginning of 
the control section in which it appears. 
The following is invalid if it appears less 
than 500 bytes from the beginning of the 
current control section. 



r ■ — T T 1 

I Name | Operation | Operand | 

^ + + ^ 

III I 

I I ORG I*- 500 I 

L X J. J 

If it is desired to reset the location 
counter to the next available byte in the 
current control section, the following 
statement would be used: 

r T T 1 

I Name | Operation | Operand | 

^ 1 1 ^ 

I lORG I I 

L i X J 

If previous ORG statements have reduced 
the location counter for the purpose of 
redefining a portion of the current control 
section, an ORG statement with an omitted 
operand can then be used to terminate the 
effects of such statements and restore the 
location counter to its highest setting: 
Note : Through use of the ORG statement two 
instructions may be given the same location 
counter values. In such a case the second 
instruction will not always eliminate the 
effects of the first instruction. Consider 
the following example: 

ADDR DC A(LOC) 

ORG *-4 
B DC C ' BETA ' 

In this example the value of B (BETA) will 
be destroyed by the relocation of ADDR 
during linkage editing. 

LTORG — BEGIN LITERAL POOL 

The LTORG instruction causes all liter- 
als since the previous LTORG (or start of 
the program) to be assembled at appropriate 
boundaries starting at the first double- 
word boundary following the LTORG 
statement. If no literals follow the LTORG 
statement, alignment of the next instruc- 
tion (which is not a LTORG instruction) 
will occur. Bytes skipped are not zeroed. 
The format of the LTORG instruction state- 
ment is : 
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r T T 1 

I Name | Operation | Operand | 

|. 1 1 ^ 

I Symbol |LTORG j Not used j 

lor I I I 

I blank | | | 

L X X- J 



The symbol represents the address of the 
first byte of the literal pool. It has a 
length attribute of 1. 

The literal pool is organized into four 
segments within which the literals are 
stored in order of appearance, dependent on 
the divisibility properties of their object 
lengths (dup factor times total explicit 
or implied length) . The first segment 
contains all literals whose object length 
is a multiple of eight. Those remaining 
literals with lengths divisible by four 
are stored in the second segment. The 
third segment holds the remaining even- 
length literals. Any literals left over 
have odd lengths and are stored in the 
fourth segment. 

Since each literal pool begins at a 
double-word boundary, this guarantees that 
all segment one literals are double-word, 
segment two full-word, and segment three 
half-word aligned, with no space wasted 
except, possibly, at the pool origin. 

Literals from the following statement 
are in the pool, in the segments indicated 
by the circled numbers , where (8) means 
multiple of eight, etc.. 



MVC 


A(12) ,=3F'l' 


SH 


3,=H'2' 


LM 


0,3,=2F'1,2' 


IC 


2,=XL1'1' 


AD 


2,=D'2' 



@ 



CD 
r 



S pecial Addressing Consideration 



Any literals used after the last LTORG 
statement in a program are placed at the 
end of the first control section. If there 
are no LTORG statements in a program, all 
literals used in the program are placed at 
the end of the first control section. In 
these circumstances the programmer must 
ensure that the first control section is 
always addressable. This means that the 
base address register for the first control 
section should not be changed through usage 
in subsequent control sections. If the 
programmer does not wish to reserve a 
register for this purpose, he may place a 
LTORG statement at the end of each control 
section thereby ensuring that all literals 
appearing in that section are addressable. 



D uplicate Literals 



If duplicate literals occur within the 
range controlled by one LTORG statement, 
only one literal is stored. Literals are 
considered duplicates only if their speci- 
fications are identical. A literal will be 
stored, even if it appears to duplicate 
another literal, if it is an A-type address 
constant containing any reference to the 
location counter. 

The following examples illustrate how 
the assembler stores pairs of literals, if 
the placement of each pair is controlled by 
the same LTORG statement. 



X'FO' 

CO' 

XL3'0' 

HL3 ' ■ 
A(*+4) 

A(*+U) 

X'FFFF' 

X • FFFF ' 



Both are stored 



Both are stored 



Both are stored 



Identical; the first is stored 



CNOP — CONDITIONAL NO OPERATION 

The CNOP instruction allows the program- 
mer to align an instruction eit a specific 
half-word boundary. If any bytes must be 
skipped in order to align the instruction 
properly, the assembler ensures an unbroken 
instruction flow by generating no-operation 
instructions. This facility is useful in 
creating calling sequences consisting of a 
linkage to a subroutine followed by parame- 
ters such as channel command words (CCW) . 



The CNOP instructi 
ment of the location c 
half-word, word, or 
If the location counte 
aligned, the CNOP 
effect. If the 
requires the location 
mented, one to three 
tions are generated, e 
bytes . 



on ensures the align- 
ounter setting to a 
double-word boundary, 
r is already properly 
instruction has no 
specified alignment 
counter to be incre- 
no-operation instruc- 
ach of which uses two 



The format of the 
statement is as follows: 



CNOP instruction 



r T T 

I Name | Operation (Operand 



A se- 
quence I 
symbol 
or 
blank 



CNOP 



-+ 

[Two absolute 
I expressions of 
I the form b,w 
I 
1 
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Double Word 



Word 



Word 



Half Word 



Half Word 



Half Word 



Half Word 



Byte 



Byte 



Byte I Byte j Byte 



Byte j Byte 



Byte 



0,4 
0,8 



2,4 
2,8 



0,4 
4,8 



2,4 
6,8 



Figure 5-6. CNOP Alignment 



Any symbols used in the expressions in 
the operand field must have been previously 
defined. 

Operand b specifies at which byte in a 
word or double word the location counter is 
to be set; b can be 0, 2, 4, or 6 . Operand 
w specifies whether byte b is in a word 
(w=4) or double word (w=8). The following 
pairs of b and w are valid: 



Specifies 

Beginning of a word 
Middle of a word 
Beginning of a double word 
Second half word of a double word 
Middle (third half word) of a dou- 
ble word 
6,8 Fourth half word of a double word 

Figure 5-6 shows the position in a 
double word that each of these pairs speci- 
fies. Note that both 0,4 and 2,4 specify 
two locations in a double word. 



Assume that the location counter is 
currently aligned at a double-word bounda- 
ry. Then the CNOP instruction in this 
sequence: 



causes three branch-on-conditions 
(no-operations) to be generated, thus 
aligning the BALR instruction at the last 
half-word in a double word as follows: 



r T T 

I Name | Operation | Operand 



|BCR 


|0,0 


|BCR 


|0,0 


jBCR 


|0,0 


IBALR 


|2,14 


i_ 


1 



After the BALR instruction is generated, 
the location counter is at a double-word 
boundary, thereby ensuring an unbroken 
instruction flow. 



COPY — COPY PREDEFINED SOURCE CODING 



The COPY instruction obtains source- 
language coding from a library and includes 
it in the program currently being 
assembled. The format. of the COPY instruc- 
tion statement is as follows: 



r T T 1 

I Name | Operation | Operand j 

j. 1 1 ^ 

I I CNOP 1 0,8 I 

I IBALR I 2,14 I 

L i X J 



has no effect; it is merely printed in the 
assembly listing. However, this sequence: 



r T T 1 

I Name | Operation | Operand j 

|. + 1 ^ 

j I CNOP 1 6, 8 I 

I IBALR 1 2,14 I 

L X X J 



r T T T 

I Name | Operation | Operand | 

^ 1 + ^ 

I Blank I COPY I One symbol | 

L X X J 



The operand is a symbol that identifies 
a partitioned data set member to be copied 
from either the system macro library or a 
user library concatenated to it. Insert- 
ing code in the library to be copied later 
is performed by the lEBUPDAT or lEBUPDTE 
routines, details of which are covered in 
the OS Utilities. 



The assembler inserts the requested cod- 
ing immediately after the COPY statement 
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is encountered. The requested coding may 
not contain any COPY, END, ICTL, ISEQ, 
MACRO, or MEND statements. 

If identical COPY statements are encoun- 
tered, the coding they request is brought 
into the program each time. All statements 
included in the program via COPY are proc- 
essed using the standard format regardless 
of any ICTL instructions in the program. 
(For a further discussion of COPY see 
Section 7.) 



END — END ASSEMBLY 



The END instruction terminates the 
assembly of a program. It may also desig- 
nate a point in the program or in a 
separately assembled program to v/hich con- 
trol may be transferred after the program 
is loaded. The END instruction must always 
be the last statement in the source pro- 
gram. A literal may not be used. If an 
external symbol is used in the expression, 
the value of the expression must be 0. 

The format of the END instruction state- 
ment is as follows: 



^ ^ ^ T 

I Name | Operation | Operand | 

|. 1 1 -I 

I Blank | END |A relocatable ex- | 
I I jpression or blank j 
L X X . J 



The operand specifies the point to which 
control may be transferred when loading is 
complete. This point is usually the first 
machine-instruction in the program, as 
shown in the following sequence. 



^ ^ ^ 

I Name | Operation [Operand 



h 



NAME I CSECT 
AREA I DS 
BEGIN JBALR 
I USING 



END 



|50F 
|2,0 
I*. 2 



BEGIN 



NOTE: Editing errors in system macro 
definitions (macro definitions included 
in a macro library) are discovered when 
the macro definitions are read from the 
macro library. This occurs after the END 
statement has been read. They will there- 
fore be flagged after the END statement. 
If the programmer does not know which of 
his system macros caused an error, it is 
necessary to punch all system macro defi- 
nitions used in the program, including 
inner macro definitions, and insert them 
in the source program as programmer macro 
definitions, since programmer macro defini- 
tions are flagged in-line. To aid in 
debugging it is advisable to test all macro 
definitions as programmer macro definitions 
before incorporating them in the library as 
system macro definitions. 
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PART II — THE MACRO LANGUAGE 



SECTION 6: INTRODUCTION TO THE MACRO LANGUAGE 



SECTION 7: HOW TO PREPARE MACRO DEFINITIONS 



SECTION 8: HOW TO WRITE MACRO INSTRUCTIONS 



SECTION 9: HOW TO WRITE CONDITIONAL ASSEMBLY INSTRUCTIONS 



SECTION 10: EXTENDED FEATURES OF THE MACRO LANGUAGE 



SECTION 6: INTRODUCTION TO THE MACRO LANGUAGE 



The Operating Systeni/360 macro language 
is an extension of the Operating SYStein/360 
assembler language. It provides a conven- 
ient way to generate a desired sequence of 
assembler language statements many times in 
one or more programs. The macro-definition 
is written only once, and a single state- 
ment, a macro instruction statement, is 
written each time a programmer wants to 
generate the desired sequence of state- 
ments . 



This facility simplifies the coding of 
programs , reduces the chance of program.ming 
errors, and ensures that standard sequences 
of statements are used to accomplish 
desired functions . 



THE MACRO DEFINITION 



A macro definition is a set of 
statements that provides the assembler 
with: (1) the mnemonic operation code and 
the format of the macro instruction, and 
(2) the sequence of statements the assem- 
bler generates when the macro instruction 
appears in the source program. 

Every macro definition consists of a 
macro definition header statement, a macro 
instruction prototype statement, one or 
more model statements, COPY statements, 
MEXIT, MNOTE, or conditional assembly 
instructions, and a macro definition trail- 
er statement. 



An additional facility, called condi- 
tional assembly, allows one to code state- 
ments which may or may not be assembled, 
depending upon conditions evaluated at 
assembly time. These conditions are usual- 
ly tests of values, which may be defined, 
set, changed, and tested during assembly. 
The conditional assembly facility may be 
used without using macro instruction state- 
ments . 



The macro definition header and trailer 
statements indicate to the assembler the 
beginning and end of a macro definition. 

The macro instruction prototype state- 
ment specifies the mnemonic operation code 
and the type of the macro instruction. 

The model statements are used by the 
assembler to generate the assembler lan- 
guage statements that replace each occur- 
rence of the macro instruction. 



THE MACR O INSTRUCTION STATEMENT 

A macro instruction statement (hereafter 
called a macro instruction) is a source 
program statement. The assembler generates 
a sequence of assembler language statements 
for each occurrence of the same macro 
instruction. The generated statements are 
then processed like any other assembler 
language statement. 

Macro instructions can be tested by 
placing them before the assembly cards of a 
test program. 

Three types of macro instructions may be 
written. They are positional, keyword, and 
mixed-mode macro instructions. Positional 
macro instructions permit the programmer to 
write the operands of a macro instruction 
in a fixed order. Keyword macro 
instructions permit the programmer to write 
the operands of a macro instruction in a 
variable order. Mixed-mode macro 
instructions permit the programmer to use 
the features of both positional and keyword 
macro instructions in the same macro 
instruction. 



The COPY statements may be used to copy 
model statements, MEXIT, MNOTE or condi- 
tional assembly instructions from a system 
library into a macro definition. 

The MEXIT instruction can be used to 
terminate processing of a macro definition. 

The MNOTE instruction can be used to 
generate an error message when the rules 
for writing a particular macro instruction 
are violated. 

The conditional assembly instructions 
may be used to vary the sequence of state- 
ments generated for each occurrence of a 
macro instruction. Conditional assembly 
instructions may also be used outside 
macro definitions, i.e., among the assem- 
bler language statements in the program. 



THE MACRO LIBRARY 



The same macro definition may be made 
available to more than one source program 
by placing the macro definition in the 
macro library. The macro library is a 
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VARYING THE GENERATED STATEMENTS 



Each time a macro instruction appears in 
the source program it is replaced by the 
same sequence of assembler language 
statements. Conditional assemibly instruc- 
tions, however, may be used to vary the 
number and format of the generated state- 
ments . 



SYSTEM AND PROGRAMMER MACRO DEFINITIONS 



,A macro definition included in a source 
deck is called a programmer macro defini- 
tion. One residing in a macro library is 
called a system macro definition. There 
is no difference in function. If a pro- 
grammer macro is included in a macro 
library it becomes a system macro defini- 
tion, and if a system macro definition is 
punched and included in a source deck it 
becomes a programmer macro definition. 

System and programmer macros will be 
expanded the same, but syntax errors are 
handled differently. In programmer macros, 
error messages are attached to the state- 
ments in error. In system macros, however, 
error messages cannot be associated with 
the statement in error because these macros 
are located and edited after the entire 
source deck has been read. Thereof ore, the 
error messages are associated with the END 
statement. 

Because of the difficulty of finding 
syntax errors in system macros, a macro 
definition should be run and "debugged" as 
a programmer macro before it is placed in a 
macro library. 



VARIABLE SYMBOLS 



A variable symbol is a 
that is assigned different va 
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A variable symbol is written as an 
ampersand followed by fromi one through 
seven letters and/or digits, the first of 
which miust be a letter. Elsewhere, two 
ampersands must be used to represent an 
ampersand. 



SYSTEM- MACRO INSTRUCTIONS 



Types of Variable Symbols 



The macro instructions that correspond 
CO macro definitions prepared by IBM are 
called system macro instructions. System 
macro instructions are described in OS 
Su pervisor Services and Macro Instructions , 
and OS Data Management Macro Instructions . 



There are three types of variable sym- 
bols: symbolic pararr'eters, system variable 
symbols, and SET symbols. The SET symbols 
are further broken down into SETA symbols, 
SETB symibols, and S£TC symbols. The three 
types of variable symibols differ in the way 
they are assigned values. 
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Assigning Values to Variable Symbols 



ORGANIZATION OF THIS PART OF TH£ 
PUBLICATION 



SyrriDolic parameters are assigneii values 
by the programmer each time he writes a 
macro instruction. 

System variable symbols are assigned 
values by the assembler each time it proc- 
esses a macro instruction. 

SET synibols are assigned values by the 
programmer by means of conditional assembly 
instructions . 

Global SET S ymbol s 

The values assigned to SET sym.bols in 
one macro definition may be used to vary 
the statements that appear in other macro 
definitions. All SET symbols used for this 
purpose must be defined by the programmer 
as global SET symbols. All other SET 
symbols (i.e., those which may be used to 
vary statements that appear in the same 
macro definition) must be defined by the 
programmer as local SET symbols. Local SET 
sym.bols and the other variable symbols 
(that is, symbolic paranieters and system 
variable symbols) are local variable 
symbols. Global SET symbols are global 
variable symbols. 



Sections 7 and 8 describe the Dasic 
rules for preparing macro definitions and 
for writing macrc instructions. 

Section 9 describes the rules for writ- 
ing conditional assembly instructions. 

Section 10 describes additional features 
of the macro language, including rules for 
defining global SET symbols, preparing key- 
word and mixed-mode macro definitions, and 
writing keyword and mixed-rode macro 
instructions. 

Appendix G contains a reference summary 
of the entire macro language. 

Examples of the features of the language 
appear throughout the remainder of the 
publication. These examples illustrate the 
use of particular features. However, they 
are not meant to show the full versatility 
of these features. 
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SECTION 7: HOW TO PRFPARE MACRO DEFINITIONS 



A macro definition consists of: 
1. A macro definition header statement. 



2. 



A macro instruction prototype state- 
ment. 



definition and must be the last statement 
in every macro definition. The format of 
this statement is: 



r T T 

I Name | Operation | Operand 



3. Zero or more model statements, COPY 
statements, MEXIT, MNOTE, or 
conditional assembly instructions. 

U. A macro definition trailer statement. 

Except for MEXIT, MNOTE, and conditional 
assembly instructions, this section of the 
publication describes all of the statements 
that may be used to prepare macro definitions 
Conditional assembly instructions are 
described in Section 9. MEXIT and MNOTE 
instructions are described in Section 10. 



Macro definitions appearing in a source 
program must appear before all PUNCH and 
REPRO statements and all statements which 
pertain to the first control section. 
Specifically, only the listing control 
instructions (EJECT, PRINT, SPACE, and 
TITLE) , OPSYN, ICTL, and ISEQ instructions, 
and comments statements can occur before 
the macro definitions. All but the ICTL 
and OPSYN instruction can appear between 
macro definitions if there is more than 
one definition in the source program. 
Conditional assembly, substitution, and 
sequence symbols cannot be used in front of 
or between macro definitions. 

A macro -definition cannot appear within 
a macro definition and the maximum number 
of continuation cards for a macro definition 
statement is two. 

MACRO — KjACRO DEFINITION HEADER 

The macro definition header statement 
indicates the beginning of a macro 
definition. It must be the first statement 
in every macro definition. The format of 
this statement is: 

r T T 1 

I Name [Operation ] Operand j 

^ 1 1 ^ 

I Blank I MACRO | Blank | 

L X X J 

MEND ~ MACRO DEFINITION TRAILER 



A se- 
I quence j 
I symbol 

blank • 
I L. 



MEND 



I Blank 



MACRO INSTRUCTION PROTOTYPE 



The macro instruction prototype state- 
ment (hereafter called the prototype 
statement) specifies the mnemonic operation 
code and the format of all macro 
instructions that refer to the macro 
definition. It must be the second state- 
ment of every macro definition. The format 
of this statement is: 



Name 



j. 

I A sym.bolic 
I parameter 
I or blank 



-^ ^ ^ 

(Operation | Operand | 

4 1 ^ 

I A symbol ] One or more sym- | 
I |bolic parameters j 
I I separated by com- j 
I I mas, or blank j 
-X X J 



The symbolic parameters are used in the 
macro definition to represent the name 
field and operands of the corresponding 
macro instruction. A description of 
symbolic parameters appears under "Symbolic 
Parameters" in this section. 

The name field of the prototype state- 
ment may be blank, or it may contain a 
symbolic parameter. 

The symbol in the operation field is tne 
mnemonic operation code that must appear in 
all macro instructions that refer to this 
macro definition. The mnemonic operation 
code must not be the same as the mnemonic 
operation code of another macro definition 
in the source program or of a machine or 
assembler instruction as listed in Appendix 
G. 



The macro definition trailer statement 
indicates the end of a macro definition. 
It can appear only once within a macro 



The operand field may contain to 200 
symbolic parameters separated by commas. 
If there are no symbolic parameters, com- 
ments may not appear. 
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The following is an example of a 
prototype statement . 



J. ^ ^ ^ 

I Name [Operation | Operand | 

|. 1 + ^ 

I £ NAME I WOVE |gTO,gFROiyi j 

L i J. J 



Statement Format 



The prototype statement may be written 
in a format different from that used for 
assembler language statements. The normal 
format is described in Part I of this pub- 
lication. The alternate format described 
here allows the programmer to write an 
operand on each line, and allows the inter- 
spersing of operands and comments in the 
statement. 



In the alternate format, as in the 
normal format, the name and operation 
fields must appear on the first line of the 
statement, and at least one blank must 
follow the operation field on that line. 
Both types of statement formats may be used 
in the same prototype statement. 



The rules for using the alternate state- 
ment format are: 



1. If an operand is followed by a comma 
and a blank, and the column after the 
end column contains a nonblank charac- 
ter, the operand field may be contin- 
ued on the next line starting in the 
continue column. More than one oper- 
and may appear on the same line. 

2. Comments may appear after the blank 
that indicates the end of an operand, 
up to and including the end column. 

3. If the next line starts after the 
continue column, the information 
entered on the next line is considered 
comments, and the operand field is 
considered terminated. Any subsequent 
continuation lines are considered com- 
ments . 



The following examples illustrate: (1) 
the normal statement format, (2) the alter- 
nate statement format, and (3) a combina- 
tion of both statement formats. 



Name 



NAMEl 



NAME 2 



NAME 3 



Oper- 
ation 



OPl 



-+ 



0P2 



0P3 



Operand 



-T~-\ 



Comments 



-+-^ 



OPERANDI , 0PERAND2 , OPERAN | X 
D3 THIS IS THE NORMAL |X 
STATEMENT FORMAT | 
+_^ 

OPERANDI, THIS IS THE AL|X 
0PERAND2 , OPERANDS TERNA | X 

TE STATEMENT FORMAT j 
4.-^ 



OPERANDI, THIS IS A COMB | X 
0PERAND2 , OPERANDS , OPERAN | X 
DU, OPERANDS INATION OF jx 
BOTH STATEMENT FORMATS | 

. i_J 



MODEL STATEMENTS 

Model statements are the macro definition 
statements from which the desired sequences 
of assembler language statements are 
generated. Zero or more model statements 
may follow the prototype statement. A 
model statement consists of one to four 
fields. They are, from left to right, the 
name, operation, operand, and comments 
fields . 

The fields in the model statement must 
correspond to the fields in the generated 
statement. It is not possible to generate 
blanks to separate statement fields. 

Model statement fields must follow the 
rules for paired apostrophes, ampersands, 
and blanks as macro instruction operands 
(see "Macro Instruction Operands" in 
Section 8) . 

Though model statements must follow the 
normal continuation card conventions , 
statements generated from model statements 
may have more than two continuation lines. 
Substituted statements may not have blanks 
in any field except between paired apostro- 
phes. They may not have leading blanks in 
the name field. 

Name Field 

The name field may be blank or it may 
contain an ordinary symbol, a variable 
symbol, or a sequence symbol. It may also 
contain an ordinary symbol concatenated 
with a variable symbol or a variable sym- 
bol concatenated with one or more other 
variable symbols. 

Variable symbols may not appear in the 
name field of ACTR, COPY, END, ICTL, ISEQ, 
or OPSYN statements. The characters * and 
.* may not be substituted for a variable 
symbol. 

Operation Field 

The operation field may contain a 
machine instruction, an assembler instruc- 
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tion listed in Section 5 (except END, ICTL, 
ISEQ, OPSYN, or PRINT) , a macro instruction, 
or variable symbol. It may also contain an 
ordinary symbol concatenated with a variable 
symbol or a variable symbol concatenated 
with one or more other variable symbols. 

Variable symbols may not be used to 
generate 

• Macro Instructions 

• Macro prototypes 

• The following instructions: 



ACTR 


GBLA 


MEXIT 


AGO 


GBLB 


MNOTE 


AIF 


GBLC 


OPSYN 


ANOP 


ICTL 


PRINT 


COPY 


ISEQ 


REPRO 


CSECT 


LCLA 


SETA 


DSECT 


LCLB 


SETB 


END 


LCLC 


SETC 




MACRO 


START 




MEND 





Variable symbols may also be used outside 
of macro definitions to generate mnemonic 
operation codes with the preceding 
restrictions. 



A symbolic parameter consists of an 
ampersand followed by from one through 
seven letters and/or digits, the first of 
which must be a letter. Elsewhere, two 
ampersands must be used to represent an 
ampersand. 

The programmer should not use SSYS as 
the first four characters of a symbolic 
parameter . 



The 
eters : 

6 READER 
6A23456 
6X4F2 



following are valid symbolic param- 



6LOOP2 

6N 
&$4 



The following are invalid 
rameters : 



symbolic pa- 



CARDAREA (first character is not an 
ampersand) 

S256B (first character after 
ampersand is not a 
letter) 

SAREA2456 (more than seven characters 
after the ampersand) 

&BCD%34 (contains a special charac- 
ter other than initial 
ampersand) 

SIN AREA (contains a special charac- 
ter, i.e., blank, other 
than initial ampersand) 



The use of COPY instructions is de- 
scribed under "COPY Statements". 

Variable symbols in the line following 
a REPRO instruction, will not be replaced 
by their va.lues . 

Operand Field 

The operand field may contain ordinary 
symbols or variable symbols. However, 
variable symbols may not be used in the 
operand field of COPY, ICTL, ISEQ, or OPSYN 
instructions. 

Comments Field 

The coinments field may contain any 
combination of characters . No substitution 
is performed for variable symbols appearing 
in the coinments field. Only generated 
statements will be printed in the listing. 

SYMBOLIC PARAMETERS 

A symbolic parameter is a type of varia- 
ble symbol that is assigned values by the 
programmer when he writes a macro 
instruction. The programmer may vary 
statements that are generated for each 
occurrence of a macro instruction by vary- 
ing the values assigned to symbolic param- 
eters. 



Any symbolic parameters in a model 
statement must appear in the prototype 
statement of the macro definition. 

The following is an example of a macro 
definition. Note that the symbolic 
parameters in the model statements appear 
in the prototype statement. 





r 


.-y 


-T 


— 1 




|Name 


1 Operation 


1 Operand 


1 




h 


-+ 


-+ 


-H 


Header 


1 


1 MACRO 


1 




Prototype j SNAME 


1 MOVE 


1 &T0, 6 FROM 




Model 


l&NAME 


|ST 


1 2 , SAVE 




Model 




|L 


|2,£FR0M 




Model 




JST 


|2,&T0 




Model 




|L 


1 2, SAVE 




Trailer 




IMEND 


1 






L 


L 


-± . 


J 



Symbolic parameters in model statements 
are replaced by the characters of the 
macro instruction that correspond to the 
symbolic parameters. 

In the following example the characters 
HERE, FIELDA, and FIELDS of the MOVE macro 
instruction correspond to the symbolic 
parameters SNAME, 6T0, and SFROM, respec- 
tively, of the MOVE prototype statement. 
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r T T 1 

I Name | Operation | Operand 

^ 4. 1 4 

I HERE |MOVE | FIELDA,FIELDB I 

L X X J 



The macro definition, macro instruction, 
and generated statements in the following 
example illustrate these rules. 



Any occurrence of the symbolic parame- 
ters &NAME, gTO, and 6FR0M in a model 
statement will be replaced by the charac- 
ters HERE, FIELDA, and FIELDS, respective- 
ly. If the preceding macro instruction were 
used in a source program, the following 
assembler language statements would be gen- 
erated: 



r T T 

I Name | Operation | Operand 



j Name | Operation! Operand 



I- 

I HERE 

I 
I 



-+- 



1ST 
|L 
I ST 



I 2, SAVE 
|2,FIELDB 
I 2, FIELDA 
I 2 , SAVE 



The example below illustrates another 
use of the MOVE macro instruction using 
operands different from those in the 
preceding example. 



J. ^ ^ ^ 

[Name [Operation | Operand | 
|. 1 1 4 

Macro | LABEL | MOVE | IN, OUT | 
1- 1 4 4 

Generated | LABEL | ST | 2 , SAVE j 

Generated! |L |2,0UT | 

Generated! |ST 1 2, IN | 

Generated! |L ! 2, SAVE | 

L X X J 



If a symbolic parameter appears in the 
comments field of a model statement, it is 
not replaced by the corresponding charac- 
ters of the macro instruction. 



Concatenating Symbolic Parameters with 
Other Characters or' Other Symbolic 
Parameters 



If a symbolic parameter in a model 
statement is immediately preceded or fol- 
lowed by other characters or another sym- 
bolic parameter, the characters that cor- 
respond to the symbolic parameter are com- 
bined in the generated statement with the 
other characters or the characters that 
correspond to the other symbolic parameter. 
This process is called concatenation. 



Header 

Prototype 

Model 

Model 

Model 

Model 

Trailer 

Macro 

Generated 
Generated 
Generated 
Generated 



F- 



I MACRO 
gNAME ! MOVE 
gNAMEJSTSTY 
|LgTY 
iSTgTY 
JLgTY 
I MEND 



■^ 



!gTY,gP,gTO,6FROM 

I 2 , SAVEAREA 

j 2 , gPgFROM 

!2,gPgT0 

I 2 , SAVEAREA 



4- 



HERE !MOVE 

~+ 

HERE ! STD 
|LD 
I STD 
|LD 

X 



JD,FIELD,A,B 
4 



i 2 , SAVEAREA 
I 2 , FIELDB 
! 2, FIELDA 
I 2 , SAVEAREA 
.X 



The symbolic parameter gTY is used in 
each of the four model statements to vary 
the mnemonic operation code of each of the 
generated statements. The character D in 
the macro instruction corresponds to sym- 
bolic parameter gTY. Since gTY is preceded 
by other characters (i.e., ST and L) in the 
model statements, the character that cor- 
(i.e., D) is concatenated 
characters to form the 
of the generated state- 



responds to gTY 
with the other 
operation fields 
ments . 



The symbolic parameters gp, gTO, and 
gFROM are used in two of the model state- 
ments to vary part of the operand fields of 
the corresponding generated statements. 
The characters FIELD, A, and B correspond 
to the symbolic parameters gP, gTO, and 
gFROM, respectively. Since gP is followed 
by gFROM in the second model statement, the 
characters that correspond to them (i.e., 
FIELD and B) are concatenated to form part 
of the operand field of the second generat- 
ed statement. Similarly, FIELD and A are 
concatenated to form part of the operand 
field of the third generated statement. 

If the programmer wishes to concatenate 
a symbolic parameter with a letter, digit, 
left parenthesis, or period following the 
symbolic parameter he must immediately fol- 
low the symbolic parameter with a period. 
A period is optional if the symbolic param- 
eter is to be concatenated with another 
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symbolic parameter, or a special character 
other than a left parenthesis or another 
period that follows it. 

If a symbolic parameter is immediately 
followed by a period, then the symbolic 
parameter and the period are replaced by 
the characters that correspond to the sym- 
bolic parameter. A period that immediately 
follows a symbolic parameter does not 
appear in the generated statement. 

The following macro definition, macro- 
instruction, and generated statements 
illustrate these rules. 



r T T 

I Name | Operation] Operand 



Header 

Prototype 

Model 

Model 

Model 

Model 

Trailer 

Macro 

Generated 
Generated 
Generated 
Generated 



1 MACRO 


1 


gNAME|MOVE 


|&P,€S,&R1,SR2 


&NAME|ST 


|&R1,&S. (6R2) 


|L 


|6R1,&P.B 


|ST 


|&R1,&P.A 


|L 


|£R1,SS. (6R2) 


|MEND 
I 


1 

1 


T 


t 


HERE |MOVE 


1 FIELD, SAVE, 2, 4 


+ 


__| 


HERE |ST 


|2,SAVE(4) 


|L 


|2,FIELDB 


|ST 


1 2 , FIELDA 


|L 


|2,SAVE(U) 



The symbolic parameter SP is used in the 
second and third model statements to vary 
part of the operand field of each of the 
corresponding generated statements. The 
characters FIELD of the macro instruction 
correspond to £P. Since &P is to be 
concatenated with a letter (i.e., B and A) 
in each of the statements, a period immedi- 
ately follows £P in each of the model 
statements. The period does not appear in 
the generated statements. 

Similarly, symbolic parameter SS is used 
in the first and fourth model statements to 
vary the operand fields of the correspond- 
ing generated statements. &S is followed 
by a period in each of the model state- 
ments, because it is to be concatenated 
with a left parenthesis. The period does 
not appear in the generated statements. 



COMMENTS STATEMENTS 



A model statement may be a comments 
statement. A comments statement consists 
of an asterisk in the begin column, fol- 
lowed by comments. The comments statement 
is used by the assembler to generate an 
assembler language comments statement, just 
as other model statements are used by the 
assembler to generate assembler language 
statements. No variable symbol substitu- 
tion is performed- 

The programmer may also write comments 
statements in a macro-definition which are 
not to be generated. These statements must 
have a period in the begin column, immedi- 
ately followed by an asterisk and the 
comments . 

The first statement in the following 
example will be used by the assembler to 
generate a comments statement; the second 
statement will not. 

r 1 

I Name | Operation | Operand | 

y ^ 

I ♦ THIS STATEMENT WILL BE GENERATED j 
I . * THIS ONE WILL NOT BE GENERATED | 

L J 



NOTE: To get a truly representative sampl- 
ing of the various language components used 
effectively in writing macro instructions 
the programmer may list all or selected 
macro instructions from the SYSl.GENLIB or 
the SYSl.MACLIB by using the lEBPTPCH sys- 
tem utility covered in the OS Utilities 
manual. 



COPY STATEMENTS 



COPY Statements may be used to copy 
model statements and MEXIT, MNOTE, and 
conditional assembly instructions into a 
macro-definition, just as they may be used 
outside iracro definitions to copy source 
statements into an assembler language pro- 
gram- 
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The format of this statement is: 

^ ^ ^ ^ 

I Name [Operation | Operand | 

^ 1 1 ^ 

I Blank I COPY I A symbol | 

L X X J 

The operand is a symbol that identifies 
a partitioned data set member to be copied 
from either the system macro library or a 
user library concatenated to it. The sym- 
bol must not be the same as the operation 
mnemonic of a definition in the macro 
library. Any statement that may be used 
in a macro definition may be part of the 
copied coding, except MACRO, MEND, COPY, 
and prototype statements . 



When considering statement positions 
within a program the code included by a 
COPY instruction Statement should be con- 
sidered rather than the COPY itself. E'or 
example if a COPY statement in a macro- 
definition brings in global and local 
definition statements, it may appear 
immediately after the prototype statement. 
However, since global definition statements 
must come before local definition state- 
ments, if global and local definition 
statements are also specified explicitly in 
the macro definition which contains the 
COPY, the COPY must occur between the 
explicit global definition statements and 
the explicit local definition statements. 
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SECTION 8: HOW TO WRITE flACRO- INSTRUCTIONS 



The format of a macro instruction is: 

r T T 1 

I Name | Operation ) Operand | 

|. 1 1_1 ^ 

I Any sym- | Mnemonic | 0-200 operands, | 
I bol or I operation j separated by | 
I blank | code j commas. | 

L X X J 

The name field of the macro instruction 
may contain a symbol. The symbol will not 
be defined unless a symbolic param.eter 
appears in the name field of the prototype 
and the same parameter appears in the name 
field of a generated model statement. 

The operation field contains the mnemon- 
ic operation code of the macro instruction. 
The mnemonic operation code must be the 
same as the mnemonic operation code of a 
macro definition in the source program or 
in the macro library. 

The macro definition with the same mne- 
monic operation code is used by the assem- 
bler to process the macro instruction. If 
a macro definition in the source program 
and one in the macro library have the same 
mnemonic operation code, the macro 
definition in the source program is used. 

The placement and order of the operands 
in the macro instruction is determined by 
the placement and order of the symbolic 
parameters in the operand field of the 
prototype statement. 



MACRO INSTRUCTION OPERANDS 



A quoted string ends with the first 
even-numbered apostrophe that is not 
immediately followed by another apostrophe. 

The first and last apostrophes of a 
quoted string are called paired apostroph- 
es. The following example contains two 
quoted strings. The first and fourth and 
the fifth and sixth apostrophes are each 
paired apostrophes. 

'A' ' B'C'D' 

An apostrophe not within a quoted 
string, immediately followed by a letter, 
and immediately preceded by the letter L 
(when L is preceded by any special charac- 
ter other than an ampersand) , is not con- 
sidered in determining paired apostrophes. 
For instance, in the following example, the 
apostrophe is not considered. 

L' SYMBOL 

•AL' SYMBOL' is an invalid operand. 



Paired Parentheses; There must be an equal 
number of left and right parentheses. The 
nth left parenthesis must appear to the 
left of the nth right parenthesis. 



Paired parentheses 
sis and a following ri 
out any other parenth 
there is more than one 
al pair is determined 
already recognized and 
rule for paired parent 
in the following exa 
fourth, the second and 
and sixth parenthese 
rentheses . 



are a left parenthe- 
ght parenthesis with- 
eses intervening. If 

pair, each addition- 
by removing any pairs 

reapplying the above 
heses. For instance, 
mple the first and 

third, and the fifth 
s are each paired pa- 



Any combination of up to 2 55 characters 
may be used as a macro instruction operand 
provided that the following rules 
concerning apostrophes, parentheses, equal 
signs, ampersands, commas, and blanks are 
observed. 

Paired Apostrophes; An operand may contain 
one or more quoted strings. A quoted 
string is any sequence of characters that 
begins and ends with an apostrophe and 
contains an even number of apostrophes. 

The first quoted string starts with the 
first apostrophe in the operand. Subse- 
quent quoted strings start with the first 
apostrophe after the apostrophe that ends 
the previous quoted string- 



(A(B)C)D(E) 

A parenthesis that appears between 
paired apostrophes is not considered in 
determining paired parentheses. For 
instance, in the following example the 
middle parenthesis is not considered. 

(•) •) 

Equal Signs: An equal sign can only occur 
as the first character in an operand or 
between paired apostrophes or paired pa- 
rentheses. The following examples illus- 
trate these rules. 

=F'32' 

•C=D' 

E(F=G) 
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Ampersands; Except as noted under "Inner 
Macro Instructions," each sequence of con- 
secutive ampersands must be an even number 
of ampersands. The following example 
illustrates this rule. 

£6123g6g& 

Commas ; A comma indicates the end of an 
operand, unless it is placed between paired 
apostrophes or paired parentheses. The 
following example illustrates this rule. 

(A,B)C' , • 

Blanks: Except as noted under "Statement 
Format," a blank indicates the end of the 
operand field,, unless it is placed between 
paired apostrophes. The following example 
illustrates this rule. 



'ABC 

The following are 
instruction operands: 

SYMBOL 
123 

X'189A" 
+ 

L'NAME 
'TEN = 10' 
"QUOTE IS"' 



valid 



A+2 

(TO (8) ,FROM) 

0(2,3) 

=F'4096' 

AB£g9 

•PARENTHESIS IS ) 

'COMMA IS ,' 



macro- 



The following are 
instruction operands: 



invalid macro- 



W'NAME 
5A)B 



(15 B) 



ONE' IS 



(odd number of apostrophes) 
(number of left parentheses 

does not equal number of 

right parentheses) 
(blank not placed between 

paired apostrophes) 
(blank not placed between 

paired apostrophes) 



separated it from the next operand must be 
present. If the last operand (s) is omitted 
from a macro instruction, then the comma (s) 
separating the last operand (s) from the 
next previous operand may be omitted. 

The following example shows a macro 
instruction preceded by its corresponding 
prototype statement. The macro instruction 
operands that correspond to the third and 
sixth operands of the prototype statement 
are omitted in this example. 

r — ■ T T 1 

I Name | Operation | Operand | 

^ ^ _ + „ ^ 

I I EXAMPLE l&A, 6B,6C,6D,6E,6F | 
I I EXAMPLE 1 17, * + U,, AREA, FIELD (6) | 

L X . X J 

If the symbolic parameter that 
corresponds to an omitted operand is used 
in a model statement, a null character 
value replaces the symbolic parameter in 
the generated statement, i.e., in effect 
the symbolic parameter is removed. For 
example, the first statement below is a 
model statement that contains the symbolic 
parameter £C. If the operand that corres- 
ponds to 6C was omitted from the macro 
instruction, the second statement below 
would be generated from the model 
statement. 

r T • T 1 

I Name [Operation | Operand | 

^ + 1 . ^ 

I JMVC |THERESC.25,THIS j 

I JMVC |THERE2 5,THIS | 

L X . X J 



STATEMENT FORMAT 



OPERAND SUBLISTS 



Macro instructions may be written using 
the same alternate format that can be used 
to write prototype statements. If this 
format is used, a blank does not always 
indicate the end of the operand field. The 
alternate format is described in Section 7, 
under the subsection "Macro Instruction 
Prototype." Unlike prototype statements, 
macro instructions can have omitted operands, 
and they can have consecutive commas or a 
comma at the end of the operand list. 



OMITTED OPERANDS 



If an operand that appears in the proto- 
type statement is omitted from the macro 
instruction, then the comma that would have 



A sublist may occur as the operand of a 
macro instruction. 

Sublists provide the programmer with a 
convenient way to refer to a collection of 
macro instruction operands as a single 
operand, or a single operand in a collec- 
tion of operands. 

A sublist consists of one or more oper- 
ands separated by commas and enclosed in 
paired parentheses. The entire sublist, 
including the parentheses, is considered to 
be one macro instruction operand. 

If a macro instruction is written in the 
alternate statement format, each operand of 
the sublist may be written on a separate 
line; the macro instruction may be written 
on as many lines as necessary. 
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If £P1 is a symbolic parameter in a 
prototype statement, and the corresponding 
operand of a macro- instruction is a sub- 
list, then 6Pl(n) may be used in a model 
statement to refer to the nth operand of 
the sublist, where n may have a value 
greater than or equal to 1. n may be 
specified as a decimal integer or any 
arithmetic expression allowed in a SETA 
instruction. (The SETA instruction is des- 
cribed in Section 9.) If the nth operand 
is omitted, then 6P1 (n) would refer to a 
null character value. 

If the sublist notation is used but the 
operand is not a sublist, then &P1(1) 
refers to the operand and &P1(2), 
6P1(3),... refer to a null character value. 
If an operand has the f orn; ( ) , it is 
treated as a character string and not as a 
sublist. 

For example, consider the following 
macro-definition, macro-instruction, and 
generated statements. 



r T T 1 

[Name | Operation | Operand | 
|. ^ 1 ^ 



Header 

Prototype j 

Model 

Model 

Model 

Model 

Trailer 

Macro 

Generated! 

Generated! 

Generated! 

Generated] 

L J. X J 

The operand of the macro instruction 
that corresponds to symbolic parameter &NUM 
is a sublist. One of the operands in the 
sublist is referred to in the operand field 
of three of the model statements. For 
example, SNUM(l) refers to the first oper- 
and in the sublist corresponding to symbol- 
ic parameter 6NUM. The first operand of 
the sublist is A. Therefore, A replaces 
6NUM(1) to form part of the generated 
statement. 





1 MACRO 






1 ADD 


&NUM,6REG,SAREA 




|L 


6REG,&NUM(1) 




|A 


SREG,£NUM(2) 




|A 


&REG,gNUM(3) 




|ST 


€REG,£AREA 


L 


|MEND 

1 J 


L 


r 


t 






1 ADD 


(A,B,C) ,6, SUM 




|L 


6, A 




|A 


6,B 




|A 


6,C 




1 ST 


6, SUM 



represents. The following example shows 
what would be generated if a period 
appeared between the left parenthesis and 
the last character of the symbolic parame- 
ter in the first model statement of the 
above example. 



J. y J. 

I Name | Operation | Operand 

|. 1 1 

Prototype 1 | ADD | 6NUM, 6REG , 6AREA 
Model I |L I SREG,€NUM. (1) 

|. 1 1 

Macro j |ADD | (A,B,C) , 6,SUM 

|. 1 1 

Generatedl |L |6,(A,B,C)(1) 

L ± J. 



The symbolic parameter &NUM is used in 
the operand field of the model statement. 
The characters (A,B,C) of the macro- 
instruction correspond to &NUM. Since £NUM 
is immediately followed by a period, &NUM 
and the period are replaced by (A,B,C). 
The period does not appear in the generated 
statement. The resulting generated 
statement is an invalid assembler language 
statement. 



INNER MACRO INSTRUCTIONS 

A macro -instruction may be used as a 
model statement in a macro definition. 
Macro instructions used as model statements 
are called inner macro instructions. 

A macro instruction that is not used as 
a model statement is referred to as an 
outer macro instruction. 

The rule for inner macro instruction 
parameters is the same as that for outer 
macro instructions. Any symbolic param- 
eters used in an inner macro instruction 
are replaced by the corresponding characters 
of the outer macro instruction. An operand 
of an outer macro instruction sublist cannot 
be passed as a sublist to an inner macro 
instruction. 

The macro definition corres|:>onding to an 
inner macro instruction is used to generate 
the statements that replace the inner 
macro instruction. 



Note; When referring to an operand in a 
sublist, the left parenthesis of the sub- 
list notation must immediately follow the 
last character of the symbolic parameter, 
e.g., £NUM(1). A period should not be 
placed between the left parenthesis and the 
last character of the symbolic parameter. 

A period may be used between these two 
characters only when the programmer wants 
to concatenate the left parenthesis with 
the characters that the symbolic parameter 



The ADD macro instruction of the pre- 
vious example is used as an inner macro 
instruction in the following example. 

The inner macro instruction contains two 
symbolic parameters, 6S and &T. The 
characters (X,Y,Z) and J of the macro 
instruction correspond to &S and &T, 
respectively. Therefore, these characters 
replace the symbolic parameters in the 
operand field of the inner macro 
instruction. 
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The assembler then uses the macro 
caefinition that corresponds to the inner 
macro instruction to generate statements to 
replace the inner macro instruction. The 
fourth through seventh generated statements 
have been generated for the inner macro 
instruction. 



Further relevant limitations and differen- 
ces between inner and outer macro instruct- 
ions will be covered under the pertinent 
sections on sequence symbols, attributes, 
etc. 

Note; An ampersand that is part of a 
symbolic parameter is not considered in 
determining whether a macro instruction 
operand contains an even number of consecu- 
tive ampersands. 



Header 

Prototype! 

Model 

Model 

Model 

Inner 

Model 

Trailer 

Macro 

Generated] 

Generated] 

Generated] 

Generated 

Generated] 

Generated] 

Generated! 

Generated! 



r T T 1 

I Name I Operation I Operand | 

|. 1 1 ^ 





1 MACRO 






|COMP 


6Rl,gR2,6S,6T,SU 




|SR 


6Rl,gR2 




|C 


SR1,6T 




|BNE 


6U 




|ADD 


6S,12,6T 


su 


|MEND 
i 


SRI , ST 

L— — _ 


K 


|COMP 

J. -J 


10,11, t[X,Y,Z),J,K 

1 




t ^ 
JSR 


10,11 




|C 


10, J 




|BNE 


K 




|L 


12, X 




|A 


12, Y 




|A 


12, Z 




1ST 


12, J 


K 


lA 


10, J 



L X JL . J 



LEVELS OF MACRO INSTRUCTIONS 



A macro definition that corresponds to 
an outer macro instruction may contain any 
number of inner macro instructions. The 
outer macro instruction is called a first 
level macro instruction. Each of the inner 
macro instructions is called a second level 
macro instruction. 

The macro definition that corresponds to 
a second level macro instruction may con- 
tain any number of inner macro 
instructions. These macro instructions are 
called third level macro instructions, etc. 

The number of levels of macro 
instructions that may be used depends upon 
the complexity of the macro definition and 
the amount of storage available. 
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SECTION 9 



HOW TO WRITE CONDITIONAL ASSEMBLY INSTRUCTIONS 



The conditional assembly instructions 
allow the programmer to: (1) define and 
assign values to SET symbols that can be 
used to vary parts of generated statements, 
and (2) vary the sequence of generated 
statements. Thus, the programmer can use 
these instructions to generate many 
different sequences of statements from the 
same macro-definition. 

There are 13 conditional assembly 
instructions, 10 of which are described in 
this section. The other three conditional 
assembly instructions -- GBLA, GBLB, and 
GBLC — are described in Section 10. The 
instructions described in this section are: 



LCLA SETA AIF 
LCLB SETB AGO 
LCLC SETC ACTR 



ANOP 



The primary use of the conditional 
assembly instructions is in macro- 
definitions. However, all of them may be 
used in an assembler language source 
program. 

Where the use of an instruction outside 
macro-definitions differs from its use 
within macro-definitions, the difference is 
described in the subsequent text. 

The LCLA, LCLB, and LCLC instructions 
may be used to define and assign initial 
values to SET symbols. 



SET SYMBOLS 



SET symbols are one type of variable 
symbol. The symbolic parameters discussed 
in Section 7 are another type of variable 
symbol. SET symbols differ from symbolic 
parameters in three ways: (1) where they 
can be used in an assembler language source 
program, (2) how they are assigned values, 
and (3) whether or not the values assigned 
to thern can be changed. 

Symbolic parameters can only be used in 
macro-definitions, whereas SET symbols can 
be used inside and outside macro- 
definitions. 

Symbolic parameters are assigned values 
when the programmer writes a macro- 
instruction, whereas SET symbols are 
assigned values when the programmer writes 
SETA, SETB, and SETC conditional assembly 
instructions. 

Each symbolic parameter is assigned a 
single value for one use of a macro- 
definition, whereas the values assigned to 
each SETA, SETB, and SETC symbol can change 
during one use of a macro-definition. 



Defining SET Symbols 



The SETA, SETB, and SETC instructions 
may be used to assign arithmetic, binary, 
and character values, respectively, to SET 
symbols. The SETB instruction is described 
after the SETA and SETC instructions, 
because the operand field of the SETB 
instruction is a combination of the operand 
fields of the SETA and SETC instructions. 



SET symbols must be defined by the 
programmer before they are used. When a 
SET symbol is defined it is assigned an 
initial value. SET symbols may be assigned 
new values by means of the SETA, SETB, and 
SETC instructions. A SET symbol is defined 
when it appears in the operand field of an 
LCLA, LCLB, or LCLC instruction. 



The AIF, AGO, and ANOP instructions may 
be used in conjunction with sequence sym- 
bols to vary the sequence in which state- 
ments are processed by the assembler. The 
programmer can test attributes assigned by 
the assembler to symbols or macro- 
instruction operands to determine which 
statemients are to be processed. The ACTR 
instruction may be used to vary the maximum 
number of AIF and AGO branches. 

Examples illustrating the use of 
conditional assembly instruction are 
included throughout this section. A chart 
sximmarizing the elements that can be used 
in each instruction appears at the end of 
this section. 



Using Variable Symbols 



The SETA, SETB, and SETC instructions 
may be used to change the values assigned 
to SETA, SETB, and SETC symbols, 
respectively. When a SET symbol appears in 
the name, operation, or operand field of a 
model statement, the current value of the 
SET symbol (i.e., the last value assigned 
to it) replaces the SET symbol in the 
statement. 

For example, if &A is a symbolic parame- 
ter, and the corresponding characters of 
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the macro-instruction are the symbol HERE, 
then HERE replaces each occurrence of £A in 
the macro-definition. However, if SA is a 
SET symbol, the value assigned to 6A can be 
changed, and a different value can replace 
each occurrence of SA in the macro- 
definition. 

The same variable symbol may not be used 
as a symbolic parameter and as a SET symbol 
in the same macro-definition. 

The following illustrates this rule. 

r T T 1 

I Name | Operation (Operand | 

|. 1 + ^ 

I & NAME I MOVE |&TO,SFROM | 

L i JL J 

If the statement above is a prototype 
statement, then &NAME, STO, and SFROM may 
not be used as SET symbols in the macro- 
definition. 

The same variable symbol may not be used 
as two different types of SET sym.bols in 
the same macro-definition. Similarly, the 
same variable symbol may not be used as two 
different types of SET symbols outside 
m£icro-def initions . 

For example, if SA is a SETA symbol in a 
macro-definition, it cannot be used as a 
SETC symbol in that definition. Similarly, 
if SA is a SETA symbol outside macro- 
definitions, it cannot be used as a SETC 
symbol outside macro-definitions. 

The same variable symbol may be used in 
two or more macro-definitions and outside 
macro-definitions. If such is the case, 
the variable symbol will be considered a 
different varieible symbol each time it is 
used. 



For example, 
(either SET symbo 
in one macro-def 
a variable symbol 
symbolic paramet 
Similarly, if SA 
symbol or symbo 
definition, it ca 
outside macro-def 



if SA is a vari 
1 or symbolic 
inition, it can 

(either SET 
er) in another 
is a variable s 
lie parameter) 
n be used as a 
initions. 



able symbol 

param.eter ) 

be used as 

symbol or 

definition. 

ymbol (SET 

in a macro- 

SET symbol 



All variable symbols may be concatenated 
with other characters in the same way that 
symbolic parameters may be concatenated 
with other characters. The rules for 
concatenating symbolic parameters with 
other characters are in Section 7 under the 
subsection "Symbolic Parameters." 

Variable symbols in macro-instructions 
are replaced by the values assigned to 
them, immediately prior to the start of 
processing the definition. If a SET symbol 



is used in the operand field of a macro- 
instruction, and the value assigned to the 
SET symbol is equivalent to the sublist 
notation, the operand is not considered a 
sublist. 

ATTRIBUT ES 

The assembler assigns attributes to 
macro- instruction operands and to symbols 
in the program. These attributes may be 
referred to only in conditional assembly 
instructions or expressions. 

There are six kinds of attributes. They 
are: type, length, scaling, integer, 
count, and number. Each kind of attribute 
is discussed in the paragraphs that follow. 

If an outer macro-instruction operand is 
a symbol before substitution, then the 
attributes of the operand are the same as 
the corresponding attributes of the symbol. 
The symbol must appear in the name field of 
an assembler language statement or in the 
operand field of an EXTRN statement in the 
prograni. The statement must be outside 
macro-definitions and must not contain any 
variable symbols. 

If an inner macro-instruction operand is 
a symbolic parameter, then the attributes 
of the operand are the same as the attri- 
butes of the corresponding outer macro 
instruction operand. A symbol appearing as 
an inner macro instruction operand is not 
assigned the same attributes as the same 
symbol appearing as an outer macro instruc- 
tion operand. 

If a macro- instruction operand is a 
sublist, the programmer may refer to the 
attributes of either the sublist or each 
operand in the sublist. The type, length, 
scaling, and integer attributes of a 
sublist are the same as the corresponding 
attributes of the first operand in the 
sublist. 

All the attributes of macro-instruction 
operands may be referred to in conditional 
assembly instructions within macro- 
definitions. However, only the type, 
length, scaling, and integer attributes of 
symbols may be referred to in conditional 
assembly instructions outside macro- 
definitions. Symbols appearing in the name 
field of generated statements are not 
assigned attributes. 

Each attribute has a notation associated 
with it. The notations are: 



Attribute 


Notation 


Type 


T* 


Length 


L' 


Scaling 


S' 


Integer 


I' 


Count 


K' 


Number 


N' 
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The prograitimer may refer to an attribute G 
in the following ways : 

H 

1. In a statement that is outside macro 
definitions, he may write the notation K 
for the attribute immediately followed 

by a symbol. (e.g.,, T'NAME refers to L 
the type attribute of the symbol 
NAME.) P 

2. In a statement that is in a macro- q 
definition, he may write the notation 

for the attribute immediately followed r 
by a symbolic parameter. (e.g., 
L'SNAME refers to the length attribute s 
of the characters in the macro- 
instruction that correspond to v 
symbolic parameter SNAME; L'SNAME(2) 
refers to the length attribute of the X 
second operand in the sublist that Y 
corresponds to symbolic parameter 
SNAME.) Z 



Fixed-point constant, explicit 

length. 

Half-word fixed-point constant, 

implied length, aligned. 

Floating-point constant, 

explicit length. 

Extended floating-point constant, 

implied length, aligned 

Packed decimal constant. 

Q-type address constant, implied 

length, aligned. 

A-, S-, Q-, V-, or Y-type address 

constant, explicit length. 

S-type address constant, 

implied length, aligned. 

V-type address constant, 

implied length, aligned. 

Hexadecimal constant. 

Y-type address constant, 

implied length, aligned. 

Zoned decimal constant. 



Type Attribute (T*) 



The type attribute of a macro 
instruction operand, or a symbol is a 
letter. 

The following letters are used for 
symbols that name DC and DS statements and 
for outer macro instruction operands that 
are symbols that name DC or DS statements. 

A A-type address constant, 

implied length, aligned, (also in 

CXD statement) 
B Binary constant. 
C Character constant. 
D Long floating-point constant, 

implied length, aligned. 
E Short floating-point constant, 

implied length, aligned. 
5* Full-word fixed- point constant, 

implied length, aligned. 



The following letters are used for sym- 
bols (and outer macro instruction operands 
that are symbols) that name statements 
other than DC or DS statements, or that 
appear in the operand field of an EXTRN 
statement. 

I Machine instruction 
J Control section name 
M Macro instruction 
T EXTRN symbol 
W CCW instruction 
$ WXTRN symbol 

The following letters are used for inner 
and outer macro instruction operands only- 

N Self-defining term 
O Omitted operand 

The following letter is used for inner 
and outer macro instruction operands that 
cannot be assigned any of the above let- 
ters. This includes inner macro 
instruction operands that are symbols. 
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This letter is also assigned to symbols 
that name EQU and LTORG statements, to any 
symbols occurring more than once in the 
name field of source statements, and to all 
symbols naming statements with expressions 
as modifiers. 



U 



Undefined 



The attributes of A, B, C and D are 
undefined in the following example: 



r T T 

I Name | Operation | Operand 



|B 
|C 

L 



-+- 



I DC 

I DC 

I DC 

DC 



i 3FL(AA-BB) '75 ' 

I (AA-BB)FVL5' 

I &X'l' 

I FL(3-2) '1' 

.X 



After generation, this would result in 

MVC Z(L'Z) ,X 

Conditional assembly instructions must 
not refer to the length attributes of 
symbols or macro instruction operands whose 
type attributes are the letters M, N, 0, T, 

U, W, or $. 

Scaling and integer attributes are pro- 
vided for symbols that name fixed- point, 
floating-point, and decimal fields. 

Fixed and Floating Point; The scaling 
attribute of a fixed-point or floating- 
point number is the value given by the 
scale modifier. The integer attribute is a 
function of the scale and length attributes 
of the number. 



The programmer may refer to a type 
attribute in the operand field of a SETC 
instruction, or in character relations in 
the operand fields of SETB or AIF 
instructions. 



L ength (L') 
Attributes 



icaling (S*), and Integer (I*) 



The length, scaling, and integer attri- 
butes of macro instruction operands, and 
symbols are numeric values. 

The length attribute of a symbol (or of 
a macro instruction operand that is a 
symbol) is as described in Part I of this 
publication. The use of the length attribute 
of a symbol defined with a DC or DS with 
explicit length given by an expression is 
invalid. Reference to the length attribute 
of a variable symbol is illegal except for 
symbolic parameters in SETA, SETB and AIF 
statements. If the basic L' attribute is 
desired, it may be obtained as follows: 

&A SETC ' Z ' 
&B SETC 'L' ' ' 

MVC &A. (&B&A) ,X 



Decimal; The scaling attribute of a 
decimal number is the number of decimal 
digits to the right of the decimal point. 
The integer attribute of a decimal number 
is the number of decimal digits to the left 
of the assumed decimal point after the 
number is assembled. 



Scaling and integer attributes are 
available for symbols and macro instruction 
operands only if their type attributes are 
H,F, and G, (fixed point); D,E,L, and K 
(floating point) ; or P and Z (decimal) . 



The programmer may refer to the length, 
scaling, and integer attributes in the 
operand field of a SETA instruction, or in 
arithmetic relations in the operand fields 
of SETB or AIF instructions. 



Count Attribute (K') 



The programmer may refer to the count 
attribute of macro instruction operands 
only. 



The value of the count attribute is 
equal to the number of characters in the 
macro instruction operand. It includes 
all characters in the operand, but does 
not include the delimiting commas. The 
count attribute of an omitted operand is 
zero. These rules are illustrated by the 
following examples: 



Operand 

ALPHA 

( JUNE , JULY , AUGUST ) 
2(10,12) 
A(2) 
•A' 'B' 



Count Attribute 
5 



The following examples illustrate this 
rule. 



(A,B,C,D,E) 
(A, ,C,D,E) 
(A,B,C,D) 
(,B,C,D,E) 
(A,B,C,D,) 
(A,B,C,D, ,) 



5 operands 
5 operands 

4 operands 

5 operands 

5 operands 

6 operands 



If the macro-instruction operand is not 
a sublist, the number attribute is one. If 
the macro instruction operand is omitted, 
the number attribute is zero. 

The programmer may refer to the number 
attribute in the operand field of a SETA 
instruction, or in arithmetic relations in 
the operand fields of SETB and AIF instruc- 
tions that are part of a macro definition. 



If a macro instruction operand contains 
variable symbols, the characters that 
replace the variable symbols, rather than 
the variable symbols, are used to determine 
the count attribute. 



Assigning Attributes t o Symbols 



The integer attribute is computed from 
the length and scaling attributes. 



The programmer may refer to the count 
attribute in the operand field of a SETA 
instruction, or in arithmetic relations, in 
the operand fields of SETB and AIF instruc- 
tions that are part of a macro- definition. 



Fixed Point; The integer attribute of a 

fixed-point number is equal to eight times 

the length attribute of the number minus 

the scaling attribute minus one; i.e., 
I'=8*L*-S'-1. 



Number Attribute (N*) 



Tl^e programmer may refer to the number 
attribute of macro instruction operands 
only. 



Each of the following statements defines 
a fixed-point field. The length attribute 
of HALFCON, is 2, the scaling attribute is 
6, and the integer attribute is 9. The 
length attribute of ONECON is 4, the scal- 
ing attribute is 8, and the integer attri- 
bute is 23. 



The number attribute is a value equal to 
the number of operands in an operand sub- 
list. The number of operands in an operand 
sublist is equal to one plus the number of 
commas that indicate the end of an operand 
in the sublist. 



r- T T T 

I Name | Operation | Operand | 

^ 1 1 ^ 

JHALFCON I DC iHS6'-25.93' j 

I ONECON I DC |FS8'100.3E-2' | 

L X a. J 
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Fl oating Point : The integer attribute of a 
Type D or E floating-point number is equal 
to two times the difference between the 
length attribute of the number and one, 
minus the scaling attribute: i.e., 1'=?* 
(L'-D-s-. 

Because of its low order characteristic, 
the integer attribute of a Type L constant 
with a length greater than 8 bytes is two 
less than the value indicated in the formula 
above. The integer attribute of a Type L 
constant with a length of 8 bytes or less 
is the same as the value indicated in the 
formula above. 

Each of th€i following statements defines 
a floating-point field. The length attri- 
bute of SHORT is a, the scaling attribute 
is 2, and the integer attribute is U. The 
length attribute of LONG is 8, the scaling 
attribute is 5, and the integer attribute 
is 9. 



J. ^ ^ . ^ 

I Name | Operation | Operand | 

j. 1 1 _ ^ 

ISHORT IDC |ES2'U6.415" j 

I LONG I DC iDS5'-3.729' | 

L J. J. J 



S EQUENCE SYMBOLS 



The name field of a statement may con- 
tain a sequence symbol. Sequence symbols 
provide the programmer with the ability to 
vary the sequence in which statements are 
processed by the assembler. 

A sequence symbol is used in the operand 
field of an AIF or AGO statement to refer 
to the statement named by the sequence 
symbol. 

A sequence symbol is considered to be 
local to a macro definition. 

A sequence sym.bol may be used in the 
name field of any statement that does not 
contain a symbol or SET symbol except a 
prototype statement, a MACRO, LCLA, LCLB, 
LCLC, GBLA, GBLB, GBLC , ACTR, ICTL, ISEQ, 
or COPY instruction. 



A sequence symbol consists of a period 
followed by one through seven letters 
and/or digits, the first of which must be a 
letter. 



Decimal; The integer attribute of a packed 
decimal number is equal to two times the 
length attribute of the number minus the 
scaling attribute minus one; i.e., 
I'=2*L"-S'-1. The integer attribute of a 
zoned decimal num.ber is equal to the dif- 
ference between the length attribute and 
the scaling attribute; i.e., l'=L'-S'. 

Each of the following statements defines 
a decimal field. The length attribute of 
FIRST is 2, the scaling attribute is 2, and 
the integer attribute is 1. The length 
attribute of SECOND is 3, the scaling 
attribute is 0, and the integer attribute 
is 3. The length attribute of THIRD is 4, 
the scaling attribute is 2, and the integer 
attribute is 2. The length attribute of 
FOURTH is 3, the scaling attribute is 2, 
and the integer attribute is 3. 



The following are valid sequence sym- 
bols : 



READER 


.A23456 


LOOP 2 


.XUF2 


N 


.84 



The following are invalid sequence sym- 
bols: 

CARDAREA (first character is not 

a period) 
.246b (first character after 

period is not a letter) 
.AREA2456 (more than seven characters 

after period) 
.BCD%84 (contains a special character 

other than initial period) 
.IN AREA (contains a special 

character, i.e., blank, 

other than initial period) 



r T T T 

[Name i Operation | Operand | 

|. 1 1 ^ 

I FIRST I DC I P' +1.25' j 

I SECOND I DC |Z'-543' | 

I THIRD I DC |Z'79.68' | 

j FOURTH I DC I P' 79. 68' | 

L X „ JL J 



If a sequence symbol appears in the name 
field of a macro-instruction, and the cor- 
responding prototype statement contains a 
symbolic parameter in the name field, the 
sequence symbol does not replace the sym- 
bolic parameter wherever it is used in the 
macro-def inition. 
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The following example illustrates this 
rule. 





JNaire 

L 


~T 

1 Operation 
1 


-T 

1 Operand 
1 


1 

J 




r 


T 

1 MACRO 


T 
1 


1 


1 


1 6 NAME 


1 MOVE 


1 6T0,SFR0M 




2 


1 6 NAME 
1 


1ST 
|L 

1 ST 
|L 

1 MEND 
1 


1 2 , SAVEAREA 

|2,&FR0M 

|2,ST0 

1 2 , SAVEAREA 

1 
1 


J 


3 


r 

1 . SYjyi 

L 


t 

|MOVE 
X _ 


|FIELDA,FIELDB 


1 
J 


4 


r 


T 
1ST 

|L 
|ST 


1 2 , SAVEAREA 
|2,FIELDB 
|2,FIELDA 
1 2, SAVEAREA 






L 


X 


_x 


1 



All LCLA, LCLB, or LCLC instructions in 
a macro definition must appear immediately 
after the prototype statement and GBLA, 
GBLB or GBLC instructions. All LCLA, LCLB, 
or LCLC instructions outside macro 
definitions must appear after all macro 
definitions in the source program, after 
all GBLA, GBLB, and GBLC instructions 
outside macro definitions, before all 
conditional assembly instructions , and 
PUNCH and REPRO statements outside macro 
definitions, and before the first con- 
trol section of the program. 



SETA 



SET ARITHMETIC 



The SETA instruction may be used to 
assign an arithmetic value to a SETA sym- 
bol. The format of this instruction is: 



The symbolic parameter SNAME is used in 
the name field of the prototype statement 
(statement 1) and the first model statement 
(statement 2). In the macro- instruction 
(statement 3) a sequence symbol (.SYM) 
corresponds to the symbolic parameter 
SNAME. SNAME is not replaced by .SYM, and, 
therefore, the generated statement 
(statement 4) does not contain an entry in 
the name field. 



LCLA, LCLB, LCLC — DEFINE LOCAL SET SYMBOLS 



The format of these instructions is; 



Name 



■T T 

I Operation | Operand 



|. 1 1 ^ 

Blank | LCLA, | One or more variable 
j LCLB, or (symbols, that are 
I LCLC I to be used as SET 
I [symbols, separated 

I I by commas 

L X X J 



r T T 1 

I Name [Operation [Operand [ 

j. + 1 ^ 

[A SETA [SETA | An arithmetic j 
[symbol j [expression j 

L X X J 



The expression in the operand field is 
evaluated as a signed 32-bit arithmetic 
value which is assigned to the SETA symbol 
in the name field. The minimum and maximum 
allowable values of the expression are -2^^ 
and +23x_i^ respectively. 

The expression may consist of one term 
or an arithmetic combination of terms. The 
terms that may be used alone or in combina- 
tion with each other are self-defining 
terms, variable symbols, and the length, 
scaling, integer, count, and number attri- 
butes. Self-defining terms are described 
in Part I of this publication. 

Note; A SETC variable symbol may appear in 
a SETA expression only if the value of the 
SETC variable is one to eight decimal 
digits. The decimal digits will be con- 
verted to a positive arithmetic value. 



The LCLA, LCLB, and LCLC instructions 
are used to define and assign initial 
values to SETA, SETB, and SETC symbols, 
respectively. The SETA, SETB, and SETC 
symbols are assigned the initial values of 
0, 0, and null character value, respective- 
ly- 

The programmer should not define any SET 
symbol whose first four characters are 
SSYS. 



The arithmetic operators that may be 
used to combine the terms of an expression 
are + (addition), - (subtraction), 
* (multiplication) , and / (division) . 

An expression may not contain two terms 
or two operators in succession, nor may it 
begin with an operator. 

The following are valid operand fields 
of SETA instructions: 
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gAREA+X'2D' 
SBETA+10 
L' gHERE+32 



I'fiN/25 

gE,XIT-S' &ENTRY+1 

29 



The following are invalid operand fields 
of SETA instructions: 



The parenthesized portion or portions of 
an arithmetic expression are evaluated 
before the rest of the terms in the expres- 
sion are evaluated. If a sequence of 
parenthesized terms appears within another 
parenthesized sequence, the innermost 
sequence is evaluated first. 



SAREAX'C (two terms in succession) 
6FIELD+- (two operators in succession) 
-g DELTA* 2 (begins with an operator) 
*+32 (begins with an operator; 

two operators in succession) 
NAME/15 (NAIVSE is not a valid term) 



Eval uation of Arithmet ic Ex p ressions 



The procedure used to evaluate the 
arithmetic expression in the operand field 
of a SETA instruction is the same as that 
used to evaluate arithmetic expressions in 
assembler language statements. The only 
difference between the two types of arith- 
metic expressions is the terms that are 
allowed in each expression. 



The 
used: 



following evaluation procedure is 



1. 



Each term 
value. 



is given its numerical 



The arithmetic operations are per- 
formed moving from left to right. 
However, multiplication and/or divi- 
sion are performed before addition and 
subtraction. 

The computed result is the value 
assigned to the SETA symbol in the 
name field. 



The arithmetic e 
field of a SETA ins 
or more sequences 
bined terms that a 
ses. A sequence of 
appear within 
sequence. Only fi 
are allowed and 
consist of more tha 
required for subl 
notation, and su 
toward this limit. 



xpression in the operand 
truction may contain one 
of arithmetically corn- 
re enclosed in parenthe- 
parenthesized terms may 
another parenthesized 
ve levels of parentheses 
an expression may not 
n 16 terms. Parentheses 
ist notation, substring 
bscript notation count 



The following are examples of SETA 
instruction operand fields that contain 
parenthesized sequences of terms. 

(L'6HERE+32)*29 

f,AREA+X' 2D'/(£EXIT-S" &ENTRY+1) 

6BETA+10*(I' 6N/25/(6EXIT-S' SENTRY+D) 



Usin g SETA S ymbo ls 



The arithmetic value assigned to a SETA 
symbol is substituted for the SETA symbol 
when it is used in an arithmetic expres- 
sion. If the SETA symbol is not used in an 
arithmetic expression, the arithmetic value 
is converted to an unsigned integer, with 
leading zeros removed. If the value is 
zero, it is converted to a single zero. 



The following example illustrates this 
rule: 



r T T 

I Name | Operation | Operand 
^ 1_-. +__ 



H 



1 


1 MACRO 




1 SNAME 


1 MOVE 


1 6T0,gFR0M 


1 


ILCLA 


&A,gB,£C,gD 


|£A 


ISETA 


10 


1 &B 


ISETA 


12 


|SC 


|SETA 


£A-£B 


1 SD 


1 SETA 


SA+SC 


1 6 NAME 


1ST 


2, SAVE ARE A 


! 


|L 


2,gFR0MgC 


1 


1ST 


2, gTOgD 


1 


|L 


2, SAVEAREA 


1 


1 MEND 




L 


4. J 


L 


r 


T 


1 HERE 

L 


|MOVE 

A. J 


FIELDA, FIELDS 

L 


r 


T T 


jHERE 


1ST 


2 , SAVEAREA 


1 


|L 


2/FIELDB2 


1 


1ST 


2,FIELDA8 


1 


|L 


2, SAVEAREA 



L ± X J 



Statements 1 and 2 assign to the SETA 
symbols gA and gB the arithmetic values +10 
and +12, respectively. Therefore, state- 
ment 3 assigns the SETA symbol gC the 
arithmetic value -2. When gC is used in 
statement 5, the arithmetic value -2 is 
converted to the unsigned integer 2. When 
gC is used in statement 4, however, the 
arithmetic value -2 is used. Therefore, gD 
is assigned the arithmetic value +8. When 
gD is used in statement 6, the arithmetic 
value +8 is converted to the unsigned 
integer 8. 

The following example shows how the 
value assigned to a SETA symbol may be 
changed in a macro definition. 



82 



r T T 

I Name | Operation | Operand 



h 

1 


-+ 

1 MACRO 


+ 

1 


1 &NAiyiE 


IMOVE 


|&TO,gFROM 


I 


ILCLA 


1 SA 


l&A 


ISETA 


|5 


ISNAME 


1ST 


1 2, SAVE ARE A 


1 


|L 


1 2, 6FROM6A 


ISA 


|SETA 


|8 


1 


|ST 


|2,ST0gA 


1 


|L 


1 2, SAVE ARE A 


1 


IMEND 


1 


L 


4. 


X _ _ 


r 


T 


T 


|HERE 


IMOVE 


|FIELDA,FIELDB 


L 


J. 


X _ _ 


r 


T 


T 


|HERE 


|ST 


1 2 , SAVEAREA 


1 


|L 


|2,FIELDB5 


1 


|ST 


1 2,, FIELDA8 


1 


|L 


1 2, SAVEAREA 



L X X J 

Statement 1 assigns the arithmetic value 
+5 to SETA symbol 6A. In statement 2, SA 
is converted to the unsigned integer 5. 
Statement 3 assigns the arithmetic value +8 
to SA. In statement 4, therefore, 6A is 
converted to the unsigned integer 8, 
instead of 5. 

A SETA symbol may be used with a symbol- 
ic parameter to refer to an operand in an 
operand sublist. If a SETA symbol is used 
for this purpose it must have been assigned 
a positive value. 

Any expression that may be used in the 
operand field of a SETA instruction may be 
used to refer to an operand in an operand 
sublist. 

Sublists are described in Section 8 
under "Operand Sublists." 

The following macro definition may be 
used to add the last operand in an operand 
sublist to the first operand in an operand 
sublist and store the result at the first 
operand. A sample macro- instruction and 
generated statements follow the macro 
definition. 





r 

|Name 
L 


-T 

1 Operation 
-X — _ 


-^ 

1 Operand 

X _ _ 


-1 

1 
1 




r 


T 
1 MACRO 


t 
1 


1 


1 




|ADDX 
ILCLA 


|S NUMBER, g REG 
JSLAST 




2 


1 6 LAST 


ISETA 


|N'6NUMBER 

1 6REG, 6 NUMBER (1) 




3 


L 


|ST 

1 MEND 
_x _ 


1 6REG, SNUMBERCSLAST) 
|€REG,£NUMBER(1) 

1 
X 


1 


4 


r 
L 


lADDX 
-X — 


T 

1 (A,B,C,D,E) ,3 

! 


1 
1 




r 


T - 
|L 
|A 
jST 


|3,A 
|3,E 
|3,A 


1 




L 


_x 


_x 


.1 



SNUMBER is the first symbolic parameter 
in the operand field of the prototype 
statement (statement 1). The corresponding 
characters, (A,B,C,D,E), of the macro- 
instruction (statement 4) are a sublist. 
Statement 2 assigns to 6 LAST the arithmetic 
value +5, which is equal to the number of 
operands in the sublist. Therefore, in 
statement 3, gNUMBER(gLAST) is replaced by 
the fifth operand of the sublist. 

SETC — SET CHARACTER 



The SETC instruction is used to assign a 
character value to a SETC symbol. The 
format of this instruction is: 

r T T 1 

I Name [Operation [Operand j 

}. __| 1 ^ 

I A SETC I SETC | One operand, of | 
{symbol | | the form described j 

I I I below I 

L X X J 

The operand field may consist of the 
type attribute, a character expression, a 
substring notation, or a concatenation of 
substring notations and character 
expressions. A SETA symbol may appear in 
the operand of a SETC statement. The 
result is the character representation of 
the decimal value, unsigned, with leading 
zeros removed. If the value is zero, one 
decimal zero is used. 

Type Attribute 

The character value assigned to a SETC 
symbol may be a type attribute. If the 
type attribute is used, it must appear 
alone in the operand field. The following 
example assigns to the SETC symbol STYPE 
the letter that is the type attribute of 
the macro instruction operand that corre- 
sponds to the symbolic parameter SABC. 

r T- T -, 

I Name [Operation | Operand | 

^ + + -I 

I gTYPE I SETC i T ' SABC | 

L X X J 



Character Expressi on 

A character expression consists of any 
combination of (up to 255) characters 
enclosed in apostrophes. 

The first eight characters in a charac- 
ter value enclosed in apostrophes in the 
operand field are assigned to the SETC 
symbol in the nam.e field. The maximum size 
character value that can be assigned to a 
SETC symbol is eight characters. 

Evaluation of Character Expressions; The 
following statement assigns the character 
value AB%4 to the SETC symbol 6ALPHA: 
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r T T 1 

I Name | Operation | Operand | 

j. 1 1 _ ^ 

I ft ALPHA |SETC |'AB%U' j 

L J. X J 



The following statement assigns the 
character value HALFS6 to the SETC symbol 
gAND. 



More than one character expression may 
be concatenated into a single character 
expression by placing a period between the 
terminating apostrophe of one character 
expression and the opening apostrophe of 
the next character expression. For exam- 
ple, either of the following statements may 
be used to assign the character value 
ABCDEF to the SETC symbol SBETA. 



r T T 1 

I Name | Operation [Operand | 

^ + 1 ^ 

I SAND I SETC |'HALF6£' | 

L X X J 



Substring Notation 



r T T — 1 

I Name | Operation | Operand | 

|. 1 1 ^ 

I & BETA I SETC j "ABCDEF" | 

I &BETA I SETC |'ABC'.'DEF" | 

L X X J 



The character value assigned to a SETC 
symbol may be a substring character value. 
Substring character values permit the pro- 
grammer to assign part of a character value 
to a SETC symbol. 



Two apostrophes must be used to rep- 
resent an apostrophe that is part of a 
character expression. 

The following statement assigns the 
character value L" SYMBOL to the SETC symbol 
6 LENGTH. 



r T T 1 

I Name [Operation [Operand [ 

1- 1 1_ ^ 

[& LENGTH [SETC |"L" SYMBOL' [ 

L X X J 



Variable symbols may be concatenated 
with other characters in the operand field 
of a SETC instruction according to the 
general rules for concatenating symbolic 
parameters with other characters (see Sec- 
tion 7) . 

If 6ALPHA has been assigned the charac- 
ter value AB%4, the following statement may 
be used to assign the character value 
AB%URST to the variable symbol g GAMMA. 



r T T 1 

I Name [Operation [Operand [ 

|. + + „ ^ 

[ S GAMMA [SETC | " &ALPHA.RST' [ 

L X .X J 



Two ampersands must be used to represent 
an ampersand that is not part of a variable 
symbol. Both ampersands become part of the 
character value assigned to the SETC sym- 
bol. They are not replaced by a single 
ampersand. 



If the programmer wants to assign part 
of a character value to a SETC symbol, he 
must indicate to the assembler in the 
operand field of a SETC instruction: (1) 
the character value itself, and (2) the 
pairt of the character value he wants to 
assign to the SETC symbol. The combination 
of (1) and (2) in the operand field of a 
SETC instruction is called a substring 
notation. The character value that is 
assigned to the SETC symbol in the name 
field is called a substring character 
value. 



Substring notation 
ter expression, immedi 
arithmetic expressions 
from each other by a c 
I in parentheses. Each 
may be any expression 
the operand field of a 



consists of a charac- 
ately followed by two 

that are separated 
omma and are enclosed 
arithmetic expression 
that is allowed in 

SETA instruction. 



The first expression indicates the first 
character in the character expression that 
is to be assigned to the SETC symbol in the 
name field. The second expression indi- 
cates the number of consecutive characters 
in the character expression (starting with 
the character indicated by the first 
expression) that are to be assigned to the 
SETC symbol. If a substring asks fx;r more 
characters than are in the character string 
only the characters in the string will be 
assigned. 

The maximum size substring character 
value that can be assigned to a SETC symbol 
is eight characters. The maximum size 
character expression the substring charac- 
ter value can be chosen from is 255 charac- 
ters. If a value greater than 8 is speci- 
fied, the leftmost 8 characters will be 
used. 



84 



The 
tions : 



following are valid substring nota- 



IName 



■T T 

I Operation | Operand 



'SALPHA' (2,5) 
•AB%4' (6AREA+2,1) 
' 6ALPHA. RST* (6,6A) 
•ABC 6 GAMMA' (£A,&AREA+2) 

The following are invalid substring 
notations: 

'gBETA* (U,6) 

(blanks between character value 
and arithmetic expressions) 

• L' • SYMBOL" (m2-£XYZ) 

(only one arithmetic expression) 
'AB%U&ALPHA' (8 &FIELD+2) 

(arithmetic expressions 
not separated by a comiria) 

• BETA '4,6 

(arithmetic expressions 

not enclosed in parentheses) 



Using SETC Symbols 



The character value assigned to a SETC 
symbol is substituted for the SETC symbol 
when it is used in the name, operation, or 
operand field of a statement. 

For example, consider the following 
macro-definition, macro instruction, and 
generated statements. 



Name 



-^ ^ 

I Operation [Operand 



h 


-+ 

1 MACRO 


1 

1 


|£NAME 


IMOVE 


|6TO,SFROM 




|LCLC 


1 ^PREFIX 


1 SPREFIX 


ISETC 


1 'FIELD' 


|gNAME 


1ST 


i 2 , SAVEAREA 




IL 


1 2,&PREFIXgFROM 




|ST 


|2,&PREFIX£T0 




|L 


1 2 , SAVEAREA 


L 


|MEND 
1 


i 
1 


r 


T 


t 


|HERE 


JMOVE 


|A,B 


L— 


4- — 


4. _ 


r 


T 


T 


[HERE 


1ST 


1 2 , SAVEAREA 




|L 


1 2, FIELDS 




|ST 


|2,FIELDA 




|L 


1 2, SAVEAREA 


L 


_i 


X 



Statement 1 assigns the character value 
FIELD to the SETC symbol &PREFIX. In 
statements 2 and 3, SPREFIX is replaced by 
FIELD. 

The following example shows how the 
value assigned to a SETC symbol may be 
changed in a macro definition. 



\- 

1 


-+ 

1 MACRO 


1 

1 


ISNAME 


jMOVE 


|gTO,£FROM 


1 


|LCLC 


1 SPREFIX 


j g PREFIX 


ISETC 


1 'FIELD' 


1 6 NAME 


|ST 


1 2 , SAVEAREA 


1 


!L 


|2,SPREFIXSFR0M 


IS PREFIX 


ISETC 


1 'AREA' 


1 


|ST 


1 2 , SPREFIXSTO 


1 


|L 


1 2 , SAVEAREA 


1 
L 


1 MEND 
1 


1 

L _ 


|HERE 

L 


t 

1 MOVE 

J. 


|A,B 
— J- — 


r 

IHERE 


t 
1ST 


T 

1 2, SAVEAREA 


1 


|L 


1 2, FIELDS 


1 


1ST 


|2,AREAA 


1 


|L 


1 2 , SAVEAREA 



L X X J 

Statement 1 assigns the character value 
FIELD to the SETC symbol SPREFIX. There- 
fore, SPREFIX is replaced by FIELD in 
statement 2. Statement 3 assigns the char- 
acter value AREA to SPREFIX. Therefore, 
SPREFIX is replaced by AREA, instead of 
FIELD, in statement U. 

The following example illustrates the 
use of a substring notation as the operand 
field of a SETC instruction. 



JName j Operation | Operand j 

^ 1 + ^ 





1 MACRO 


1 


SNAME 


IMOVE 


1 STO,SFROM 




|LCLC 


1 SPREFIX 


SPREFIX 


1 SETC 


1 ■ 6T0' (1,5) 


SNAME 


|ST 


1 2 , SAVEAREA 




|L 


1 2 , SPREFIX6FR0M 




|ST 


1 2 , STO 




|L 


1 2 , SAVEAREA 




|MEND 
1 


1 

_ X — 




T 


t 


HERE 


IMOVE 
X — 


|FIELDA,B 
_X _ 




T - 


T 


HERE 


|ST 


1 2 , SAVEAREA 




|L 


1 2,FIELDB 




|ST 


|2,FIELDA 




|L 


1 2 , SAVEAREA 



L X X J 

Statement 1 assigns the substring char- 
acter value FIELD (the first five charac- 
ters corresponding to symbolic parameter 
STO) to the SETC symbol SPREFIX. There- 
fore, FIELD replaces SPREFIX in statement 
2. 

Note ; An operand of a SETC symbol cannot be 
passed as a sublist to a macro instruction. 

Concatentating Substring Notations and 
Character Expressions; Substring notations 
may be concatenated with character expres- 
sions in the operand field of a SETC 
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instruction. If a substring notation fol- 
lows a character expression, the two may be 
concatenated by placing a period between 
the terminating apostrophe of the character 
expression and the opening apostrophe of 
the substring notation. 

For example, if 6ALPHA has been assigned 
the character value AB%4, and 6BETA has 
been assigned the character value ABCDEF, 
then the following statement assigns SGAMMA 
the character value AB%4BCD. 



r T T 1 

j Name | Operation j Operand | 

j. 1 1 ^ 

IgGAMMA JSETC | ' 6ALPHA* . ' £BETA' (2, 3) j 

L i J. J 



If a substring notation precedes a char- 
acter expression or another substring nota- 
tion, the two may be concatenated by writ- 
ing the opening apostrophe of the second 
item immediately after the closing paren- 
thesis of the substring notation. 

The programmer may optionally place a 
period between the closing parenthesis of a 
substring notation and the opening apos- 
trophe of the next item in the operand 
field. 

If 6ALPHA has been assigned the charac- 
ter value AB%U, and 6ABC has been assigned 
the character value 5RS, either of the 
following statements may be used to assign 
6 WORD the character value AB%45RS. 



r T T 1 

I Name | Operation | Operand | 

^ + + ^ 

I 6 WORD I SETC j ' 6ALPHA' (1 , 4) " £ABC' j 
I SWORD jSETC I '6ALPHA' (1,4) "SABC (1,3) I 
L X ± J 



If a SETC symbol is used in the operand 
field of a SETA instruction, the character 
value assigned to the SETC symbol must be 
one to eight decimal digits. 

If a SETA symbol is used in the operand 
field of a SETC statement, the arithmetic 
value is converted to an unsigned integer 
v/ith leading zeros removed. If the value 
is zero, it is converted to a single zero. 



r T T- 

|Name J Operation] Operand 



^ + +- 



_ ^ 



I A SETB |SETB |A or a 1 enclosed or| 
I symbol j jnot enclosed in paren- 

1 theses, or a logical 
j expression enclosed 
I in parentheses 

X. 



L ±^. X . 



J 



The operand field may contain a or a 1 
or a logical expression enclosed in paren- 
theses. A logical expression is evaluated 
to determine if it is true or false; the 
SETB symbol in the name field is then 
assigned the binary value 1 or corres- 
ponding to true or false, respectively. 

A logical expression consists of one 
term or a logical combination of terms. 
The terms that may be used alone or in 
combination with each other are arithmetic 
relations, character relations, and SETB 
symbols. The logical operators used to 
combine the terms of an expression are AND, 
OR, and NOT. 

An expression may not contain two terms 
in succession. A logical expression may 
contain two operators in succession only if 
the first operator is either AND or OR and 
the second operator is NOT. A logical 
expression may begin with the operator NOT. 
It may not begin with the operators AND or 
OR. 

An arithmetic relation consists of two 
arithmetic expressions connected by a rela- 
tional operator. A character relation con- 
sists of two character values connected by 
a relational operator. The relational 
operators are EQ (equal) , NE (not equal) , 
LT (less than), GT (greater than),, LE (less 
than or equal), and GE (greater than or 
equal) . 

Any expression that may be used in the 
operand field of a SETA instruction, may be 
used as an arithmetic expression in the 
operand field of a SETB instruction. Any- 
thing that may be used in the operand field 
of a SETC instruction may be used as a 
character value in the operand field of a 
SETB instruction. This includes substring 
and type attribute notations. The maximum 
size of the character values that can be 
compared is 255 characters. If the two 
character values are of unequal size, then 
the smaller one will always compare less 
than the larger one. 



SETB — SET BINARY 



The SETB instruction may be used to 
assign the binary value or 1 to a SETB 
symbol. The format of this instruction is: 



The relational and logical operators 
must be immediately preceded and followed 
by at least one blank or other special 
character. Each relation may or may not be 
enclosed in parentheses. If a relation is 
not enclosed in parentheses, it must be 
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separated from the logical operators by at 
least one blank or other special character. 



The following are valid operand fields 
of SETB instructions: 



(6AREA+2 GT 29) 

(•AB%4* EQ "&ALPHA') 

(T'&ABC NE T'6XYZ) 

(T'6P12 EQ 'F' ) 

(SAREA+2 GT 29 OR gB) 

(NOT SB AND SAREA+X'2D' GT 29) 

CSC'EQ'MB') 

(O) 



The following are invalid operand fields 
of SETB instructions: 



SB 



(not enclosed in parentheses) 



(T'6P12 EQ 'F' SB) 

(two terms in succession) 
(•AB%U' EQ 'ALPHA' NOT SB) 

(the NOT operator must be 
preceded by AND or OR) 
(AND T'6P12 EQ 'F') 

(expression begins with AND) 



Evaluation of Logical Expressions 



The following procedure is used to 
evaluate a logical expression in the oper- 
and field of a SETB instruction: 

1. Each term (i.e., arithmetic relation, 
character relation, or SETB symbol) is 
evaluated and given its logical value 
(true or false) . 

2. The logical operations are performed 
moving from left to right. However, 
NOTs are performed before ANDs, and 
ANDs are performed before ORs. 

3. The computed result is the value 
assigned to the SETB symbol in the 
name field. 

The logical expression in the operand 
field of a SETB instruction may contain one 
or more sequences of logically combined 
terms that are enclosed in parentheses. A 
sequence of parenthesized terms may appear 
within another parenthesized sequence. 

The following are examples of SETB 
instruction operand fields that contain 
parenthesized sequences of terms. 



(NOT (SB AND SAREA+X'2D' GT 29)) 
(SB AND (T'SP12 EQ 'F' OR SB)) 

The parenthesized portion or portions of 
a logical expression are evaluated before 
the rest of the terms in the expression are 
evaluated. If a sequence of parenthesized 
terms appears within another parenthesized 
sequence, the innermost sequence is evalu- 
ated first. Five levels of parentheses are 
permissible. 



Using SETB Symbols 



The logical value assigned to a SETB 
symbol is used for the SETB symbol appear- 
ing in the operand field of an AIF instruc- 
tion or another SETB instruction. 

If a SETB symbol is used in the operand 
field of a SETA instruction, or in arith- 
metic relations in the operand fields of 
AIF and SETB instructions, the binary 
values 1 (true) and (false) are converted 
to the arithmetic values +1 and +0, respec- 
tively. 

If a SETB symbol is used in the operand 
field of a SETC instruction, in character 
relations in the operand fields of AIF and 
SETB instructions, or in any other state- 
ment, the binary values 1 (true) and 
(false) , are converted to the character 
values 1 and 0, respectively. 

The following example illustrates these 
rules. It is assumed that L'STO EQ 4 is 
true, and S'STO EQ is false. 



JName (Operation j Operand 
j. 1_ + 





1 JVjACRO 






SNAME 


|MOVE 


STO,SFROM 






ILCLA 


SAl 






ILCLB 


SB1,SB2 






ILCLC 


SCI 




SBl 


|SETB 


(L'STO EQ 4) 




SB2 


|SETB 


(S'STO EQ 0) 




SAl 


|SETA 


SBl 




SCI 


ISETC 


•SB2' 






1ST 


2 , SAVEAREA 






|L 


2,SFR0iyiSAl 






|ST 


2, ST06C1 






|L 


2, SAVEAREA 






|MEND 

X J 


_ 






t 






HERE 


IMOVE 

1 J 


FIELDA,FIELDB 






t 






HERE 


1ST 


2, SAVEAREA 






|L 


2,FIELDB1 






1ST 


2, FIELDAO 






|L 


2, SAVEAREA 





L J. ± J 
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Because the operand field of statement 1 
is true, 6B1 is assigned the binary value 
1,. Therefore, the arithmetic value +1 is 
substituted for SBl in statement 3. 
Because the operand field of statement 2 is 
false, £B2 is assigned the binary value 0. 
Therefore, the character value is substi- 
tuted for 6B2 in statement 4. 



AIF — CONDITIONAL BRANCH 



The AIF instruction is used to condi- 
tionally alter the sequence in which source 
program statements or macro-definition 
statements are processed by the assembler. 
The assembler assigns a maximum count of 
4 09 6 AIF and AGO branches that may be 
executed in the source progran. or in a 
macro-definition- When a macro-definition 
calls an inner macro-definition, the cur- 
rent value of the count is saved and a new 
count of 409 6 is set up for the inner 
macro-definition. When processing in the 
inner definition is completed and a return 
is made to the higher definition, the saved 
count is restored. The format of this 
instruction is: 



AIF instruction appears outside macro- 
definitions, then the sequence symbol in 
the operand field must appear in the name 
field of a statement outside macro- 
definitions. 



The following are valid operand fields 
of AIF instructions : 

(&AREA+X'2D' GT 2 9). READER 
(T'&P12 EQ 'F' ) .THERE 
('&FIELD3' EQ' • ) .N03 

The following are invalid operand fields 
of AIF instructions: 



(T"&ABC NE T'SXYZ) 

.X4F2 

(T'SABC NE T'gXYZ) 



(no sequence symbol) 

(no logical expression) 

X4F2 

(blanks between logical 
expression and se- 
quence symbol) 



The following macro-definition may be 
used to generate the statements needed to 
move a full-word fixed-point number from 
one storage area to another. The 
statements will be generated only if the 
type attribute of both storage areas is the 
letter F. 



Name 



|. 

I A se- I 
I quence | 
I symbol or j 
I blank | 
I I 



■T T 

I Operation | Operand 



^ ^ . ^ 

I Name | Operation | Operand 



AIF JA logical expression 
I enclosed in paren- 
I theses, immediately 
I followed by a 
I sequence symbol 



Any logical expression that may be used 
in the operand field of a SETB instruction 
may be used in the operand field of an AIF 
instruction. The sequence symbol in the 
operand field must immediately follow the 
closing parenthesis of the logical expres- 
s ion , 

The logical expression in the operand 
field is evaluated to determine if it is 
true or false. If the expression is true, 
the statement named by the sequence symbol 
in the operand field is the next statement 
processed by the assembler. If the expres- 
sion is false, the next sequential state- 
ment is processed by the assembler. 

The statement named by the sequence 
symbol may precede or follow the AIF 
instruction. 

If an AIF instruction is in a macro- 
definition, then the sequence symbol in the 
operand field must appear in the name field 
of a statement in the definition. If an 



4- 



gN 



6N 



.END 



I MACRO 
I MOVE 
I AIF 
I AIF 
I ST 

|L 
I ST 
|L 

I MEND 



|6T,6F 

I (T'6T NE T'6F) .END 
I (T'ST NE 'F') .END 
I 2 , SAVEAREA 
|2,gF 
I 2, 6T 
2 , SAVEAREA 



The logical expression in the operand 
field of statement 1 has the value true if 
the type attributes of the two macro- 
instruction operands are not equal. If the 
type attributes are equal, the expression 
has the logical value false. 

Therefore, if the type attributes are 
not equal, statement 4 (the statement named 
by the sequence symbol .END) is the next 
statement processed by the assembler. If 
the type attributes are equal, statement 2 
(the next sequential statement) is 
processed. 

The logical expression in the operand 
field of statement 2 has the value true if 
the type attribute of the first macro- 
instruction operand is not the letter F. 
If the type attribute is the letter F, the 
expression has the logical value false. 
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Therefore, if the type attribute is not 
the letter F, statement U (the statement 
named by the sequence symbol .END) is the 
next statement processed by the assembler. 
If the type attribute is the letter F, 
statement 3 (the next sequential statement) 
is processed. 



AGO — UNCONDITIONAL BRANCH 



r T "~ 


^ 


— 1 


|Name | Operation] Operand 


1 


I -1- - 


X 


1 


r T 


T 


1 


1 1 MACRO 


1 




l&NAMF. |MOVE 


|&T,£F 




1 1 |AIF 


1 (T'6T EQ 'F' ) .FIRST 




2 1 1 AGO 


1 .END 




3 |. FIRST |AIF 


1 (T* &T NE T'6F) .END 




ISNAME |ST 


|2,SAVEAREA 




1 |L 


|2,gF 




1 1ST 


|2,gT 




1 |L 


1 2 , SAVEAREA 




4 1 . END 1 MEND 


1 




L X 


X . 


1 



The AGO instruction is used to 
unconditionally alter the sequence in which 
source program or macro-definition state- 
ments are processed by the assembler. The 
assembler assigns a maximum count of 409 6 
AIF and AGO branches that may be executed 
in the source program or in a macro- 
definition. When a macro-definition calls 
an inner macro-definition, the current 
value of the count is saved and a new count 
of 4096 is set up for the inner macro- 
definition. When processing in the inner 
definition is completed and a return is 
made to the higher definition, the saved 
count is restored. The format of this 
instruction is: 



Statement 1 is used to determine if the 
type attribute of the first macro- 
instruction operand is the letter F. If 
the type attribute is the letter F, 
statement 3 is the next statement processed 
by the assembler. If the type attribute is 
not the letter F, statement 2 is the next 
statement processed by the assembler. 

Statement 2 is used to indicate to the 
assembler that the next statement to be 
processed is statement U (the statement 
named by sequence symbol .END). 

ACTR — CONDITIONAL ASSEMBLY LOOP COUNTER 



r r T 1 

I Name | Operation] Operand ] 

^ 1 1 ^ 

JA sequence] AGO ]A sequence symbol ] 
j symbol or ] j ] 

1 blank ] ] ] 

L X . X J 



The statement named by the sequence 
symbol in the operand field is the next 
statement processed by the assembler. 



The statement named by the sequence 
symbol may precede or follow the AGO 
instruction. 



If an AGO instruction is part of a 
macro-definition, then the sequence symbol 
in the operand field must appear in the 
name field of a statement that is in that 
definition. If an AGO instruction appears 
outside macro-definitions, then the 
sequence symbol in the operand field must 
appear in the name field of a statement 
outside macro-definitions. 

The following example illustrates the 
use of the AGO instruction. 



The ACTR instruction is used to assign a 
maximum count (different from the standard 
count of 4096) to the number of AGO and AIF 
branches executed within a macro-definition 
or within the source program. The format 
of this instruction is as follows: 



r • T T 1 

I Name ] Operation] Operand ] 

^ 1 + ^ 

] Blank JACTR ] Any valid SETA j 
1 ] 1 expression ] 

L . X X J 



This statement, which can only occur 
immediately after the global and local 
declarations, causes a counter to be set to 
the value in the operand field. The coun- 
ter is checked for zero or a negative 
value; if it is not zero or negative, it is 
decremented by one each time an AGO or AIF 
branch is executed. If the count is zero 
before decrementing, the assembler will 
take one of two actions: 

1. If processing is being performed 
inside a macro definition, the entire 
nest of macro definitions will be 
terminated and the next source state- 
ment will be processed. 

2. If the source program is being proc- 
essed, an END card will be generated. 
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An ACTR instruction in a macro- 
definition affects only that definition; it 
has no effect on the miinber of AIF and AGO 
branches that iray be executed in macro- 
definitions called. 



ANOP -- ASSEMBLY NO OPERATION 



The ANOP instruction facilitates 

conditional and unconditional branching to 

statements named by symbols or variable 
symbols. 



Statement 1 is used to determine if the 
type attribute of the first macro- 
instruction operand is the letter F. If 
the type attribute is not the letter F, 
statement 2 is the next statement processed 
by the assembler. If the type attribute is 
the letter F, statement 4 should be 
processed next. However, since there is a 
variable symbol (6NAME) in the name field 
of statement ^, the required sequence sym- 
bol (.FTYPE) cannot be placed in the name 
field. Therefore, an ANOP instruction 
(statement 3) must be placed before state- 
ment U . 



The format of this instruction is: 



r T T T 

I Name | Operation | Operand | 

|. + _ + ^ 

|A se- I ANOP I Blank | 

jquence j | | 

I symbol j | j 

L X X J 

If the programmer wants to use an AIF or 
AGO instruction to branch to another state- 
ment, he must place a sequence symbol in 
the name field of the statement to which he 
wants to branch. However, if the program- 
mer has already entered a symbol or varia- 
ble symbol in the name field of that 
statement, he cannot place a sequence sym- 
bol in the name field. Instead, the pro- 
grammer must place an ANOP instruction 
before the statement and then branch to the 
ANOP instruction. This has the same effect 
as branching to the statement immediately 
after the ANOP instruction. 

The following example illustrates the 
use of the ANOP instruction. 



r T T 

I Name | Operation | Operand 



Then, if the type attribute of the first 
operand is the letter F, the next statement 
processed by the assembler is the statement 
named by sequence symbol .FTYPE. The value 
of &TYPE retains its initial null character 
value because the SETC instruction is not 
processed. Since .FTYPE names an ANOP 
instruction, the next statement processed 
by the assembler is statement 4, the state- 
ment following the ANOP instruction. 



CONDITIONAL ASSEMBLY ELEMENTS 



The following chart summarizes the ele- 
ments that can be used in each conditional 
assembly instruction. Each row in this 
chart indicates which elements can be used 
in a single conditional assembly instruc- 
tion. Each column is used to indicate the 
conditional assembly instructions in which 
a particular element can be used. 







1 MACRO 








SNAME 


MOVE 
LCLC 


ST,SF 
STYPE 




1 




AIF 


(T' ST EQ • F') 


. FTYPE 1 


2 


STYPE 


SETC 


'E* 




3 


. FTYPE 


ANOP 






U 


SNAMF, 


ST6TYPE 
LSTYPE 
ST STYPE 
LSTYPE 

MEND 


2, SAVE ARE A 
2,SF 
2, ST 
2,SAVEAREA 






L J 


L J 


L 


J 



The intersection of 
indicates whether an e 
an instruction, and i 
of the instruction the 
For example, the inte 
row and the first c 
indicates that symbo 
used in the operand fi 
tions. 



a column and a row 
lement can be used in 
f so, in what fields 

element can be used, 
rsection of the first 
olumn of the chart 
lie parameters can be 
eld of SETA instruc- 
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-1- 


S.P 


Variable Symbols 

1 SET Symbols 

r 

1 SETA 1 SETB | 

--T T T- 

1 1 


SETC 


-+- 
-+- 


T' 


1 


L' 


1 
"T" 


Attributes 

S' 1 I' 1 K' 

^ ^ 

1 1 


1 


N' 


-+- 


s.s. 


SETA 


-+- 





--+- 


N, 





-+- 





1 
-+- 


03 


-+- 





-+- 





-+- 





-+- 





1 
-+- 





-+- 





- + - 




SETB 


-+- 





-+- 


O 


-— - 


-+- 


N,0 


-+- 


O 


-+- 


0^ 


-+- 


02 


-+- 


02 


-+- 


02 


-+- 


02 


-+- 


02 


-+- 




SETC 


-+- 





-+- 


O 


-_. 


-+- 





-+- 


N,0 


-+- 





-+- 


___, 


-+- 





- + - 





-+- 





-+- 





-+- 




AIF 


-+- 


o 


-+- 





... 


-+- 





-+- 


O 


-+- 


0^ 


-+- 


02 


-+- 


02 


- + - 


02 


-+- 


02 


-+- 


02 


- + - 


N,0 


AGO 


-+- 




-+- 


.-.— 


. 


-+- 




-+- 





-+- 


~_ 


-+- 





-+- 





- + - 





-+- 





-+- 





-+- 


N,0 


ANOP 














































N 





-+- 





--+- 





--+- 





-+- 





-+ — 


^ 


-■{ 


-+ — 


-+ — 


-+ — 


-+ 


ACTR 


1 





1 





1 


O 


1 


03 


1 


1 


1 


1 


1 


1 


1 




_JL_ 




X_ 




X_ 




— X_ 




_i 












_X 



^ Only in character relations 

2 Only in arithmetic relations 

3 Only if one to eight decimal digits 

Abbreviations 

N is Name L* is Length Attribute K* is Count Attribute 

O is Operand S' is Scaling Attribute N' is Number Attribute 

S.P. is Symbolic I' is Integer Attribute S.S. is Sequence Symbol 
Parameter 
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SECTION 10: EXTENDED FEATURES OF THE MACRO LANGUAGE 



The extended features of the macro lan- 
guage allow the programmer to: 

1. Terminate processing of a macro 
definition. 

2. Generate error messages. 

3. Define global SET symbols. 

4. Define subscripted SET syirbols. 

5. Use system variable symbols. 

6. Prepare keyword and mixed-mode macro 
definitions and write keyword and 
mixed-mode macro instructions. 

7. Use other System/360 macro 
definitions. 



MEXIT -- MACRO DEFINITION EXIT 



definition. MEND must be the last 
statement of every macro-definition, 
including those that contain one or more 
MEXIT instructions. 

The following example illustrates the 
use of the MEXIT instruction. 



Name 



h 



"T T 

I Operation | Operand 







1 MACRO 




&NAME 


|MOVE 


1 




|AIF 


2 




1 MEXIT 


3 


.OK 


|ANOP 




&NAME 


|ST 
|L 

JST 
|L 

|MEND 



£T,6F 

(T'&T EQ 'F') .OK 



2 , SAVEAREA 

2,6F 

2,6T 

2 , SAVEAREA 



The MEXIT instruction is used to indi- 
cate to the assembler that it should termi- 
nate processing of a macro-definition. The 
format of this instruction is: 



r T T 1 

[Name (Operation | Operand | 

i. 1 1 ^ 

I A sequence | MEXIT | Blank | 

I symbol or j j j 

I blank j | | 

L i X J 



Statement 1 is used to determine if the 
type attribute of the first macro- 
instruction operand is the letter F. If 
the type attribute is the letter F, the 
assembler processes the remainder of the 
macro-definition starting with statement 3. 
If the type attribute is not the letter F, 
the next statement processed by the 
assembler is statement 2. Statement 2 
indicates to the assembler that it is to 
terminate processing of the macro- 
definition. 



The MEXIT instruction may only be used 
in a macro-definition. 

If the assembler processes an MEXIT 
instruction that is in a macro-definition 
corresponding to an outer macro- 
instruction, the next statement processed 
by the assembler is the next statement 
outside macro-definitions. 

If the assembler processes an MEXIT 
instruction that is in a macro-definition 
corresponding to a second or third level 
macro-instruction, the next statement proc- 
essed by the assembler is the next state- 
ment after the second or third level macro- 
instruction in the macro definition, 
respectively. 

MEXIT should not be confused with MEND, 
MEND indicates the end of a macro- 



MNOTE — REQUEST FOR ERROR MESSAGE 



The MNOTE instruction may be used to 
request the assembler to generate an error 
message. The format of this instruction 
is: 



[Name 



I- 

|A sequence 
I symbol, 
jvariable 
I symbol or 
Iblank 



-T T 

I Operation | Operand 



MNOTE I A severity code, 
I followed by 
I a comma, followed 
I by any combination 
I of characters en- 
I closed in apostro- 
1 phes 
X 



Section 10: Extended Features of the Macro Language 93 



The operand of the MNOTE instruction may 
also be written using one of the following 
forms : 



r ■ 1 

I Operand | 

^_ ^ 

I severity-code, 'message* | 

I 'message' j 

I 'message' j 

L— ^ J 



The MNOTE instruction may only be used 
in a macro-definition. Variable symbols 
may be used to generate the MNOTE mnemonic 
operation code,, the severity code, and the 
message. 

The severity code may be a decimal 
integer from through 255 or an asterisk. 
If it is omitted, 1 is assumed. The 
severity code indicates the severity of the 
error, a higher severity code indicating a 
more serious error. 



Statement 1 is used to determine if the 
type attributes of^ both macro-instruction 
operands are th6 same. If they are, state- 
ment 2 is the next statement processed by 
the assembler. If they are not, statement 
4 is the next statement processed by the 
assembler. Statement 4 causes an error 
message indicating the type attributes are 
not the same to be printed in the source 
program listing. 

Statement 2 is used to determine if the 
type attribute of the first macro- 
instruction operand is the letter F. If 
the type attribute is the letter F, 
statement 3 is the next statement processed 
by the assembler. If the attribute is not 
the letter F, statement 5 is the next 
statement processed by the assembler. 
Statement 5 causes an error message indi- 
cating the type attribute is not F to be 
printed in the source program listing. 



GLOBAL AND LOCAL VARIABLE SYMBOLS 



When MNOTE ♦ occurs, the statement in 
the operand field will be printed as a The 
comment . bo Is : 



following are local variable sym- 



Two apostrophes must be used to 
represent an apostrophe enclosed in apos- 
trophes in the operand field of an MNOTE 
instruction. One apostrophe will be listed 
for each pair of apostrophes in the operand 
field. If any variable symbols are used in 
the operand field of an MNOTE instruction, 
they will be replaced by the values 
assigned to them. Two ampersands must be 
used to represent an ampersand that is not 
part of a variable symbol in the operand 
field of an MNOTE statement. One ampersand 
will be listed for each pair of ampersands 
in the operand field. 

The following example illustrates the 
use of the MNOTE instruction. 





r- 


■T- - 


— ^ — . 


— 1 




j Name 


1 Operat. 
.i _ . . 


Lon| Operand 

1 ._ 


1 

J 




1 


1 MACRO 


— t — 
1 


— 1 




I6NAME 


] 1 MOVE 
1 MNOTE 


1 &T, gF 

1*, 'MOVE MACRO GEN' 




1 




|AIF 


1 (T'ST NE T'6F).M1 




2 




|AIF 


1 (T'6T NE 'F').M2 




3 


I6NAME 


1ST 

|L 

1ST 

|L 

jMEXIT 


1 2 , SAVEAREA 

|2,6F 

|2,gT 

1 2 , SAVEAREA 

1 




4 


1 .Ml 


1 MNOTE 
JMEXIT 


1 'TYPE NOT SAME' 
1 




5 


1 .M2 


1 MNOTE 
|MEND 


1 'TYPE NOT F' 
1 






L 


.x_ 


X .. _ _ _ _. 


J 



1. Symbolic parameters, 

2 . Local SET symbols . 

3. System variable symbols. 

Global SET symbols are the only global 
variable symbols. 

The GBLA, GBLB, and GBLC instructions 
define global SET symbols, just as the 
LCLA, LCLB, and LCLC instructions define 
the SET symbols described in Section 9. 
Hereinafter, SET symbols defined by LCLA, 
LCLB, and LCLC instructions will be called 
local SET symbols. 

Global SET symbols communicate values 
between statements in one or more macro- 
definitions and statements outside macro- 
definitions. However, local SET symbols 
communicate values between statements in 
the same macro-definition, or between 
statements outside macro-definitions. 

If a local SET symbol is defined in two 
or more macro-definitions, or in a macro- 
definition and outside macro-definitions, 
the SET symbol is considered to be a 
different SET symbol in each case. 
However, a global SET symbol is the same 
SET symbol each place it is defined. 

A SET symbol must be defined as a global 
SET symbol in each macro-definition in 
which it is to be used as a global SET 
symbol. A SET symbol must be defined as a 
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global SET -symbol outside macro- 
definitions, if it is to be used as a 
global SET symbol outside macro- 
definitions. 

If the same SET symbol is defined as a 
global SET symbol in one or more places, 
and as a local SET symbol elsewhere, it is 
considered the same symbol wherever it is 
defined as a global SET symbol, and a 
different symbol wherever it is defined as 
a local SET symbol. 



Defining Local and Global SET Symbols 



Local SET symbols are defined when they 
appear in the operand field of an LCLA, 
LCLB, or LCLC instruction. These 
instructions are discussed in Section 9 
under "Defining SET Symbols." 

Global SET symbols are defined when they 
appear in the operand field of a GBLA, 
GBLB, or GBLC instruction. The format of 
these instructions is: 



r T T 

I Name | Operation | Operand 



1" 



-1 



I Blank JGBLA, | One or more variable 

I I GBLB, or I symbols that are to be j 

I I GBLC I used as SET symbols, j 

I I I separated by commas j 

L X X J 

The GBLA, GBLB, and GBLC instructions 
define global SETA, SETB, and SETC symbols, 
respectively, and assign the same initial 
values as the corresponding types of local 
SET symbols. However, a global SET symbol 
is assigned an initial value by only the 
first GBLA, GBLB, or GBLC instruction proc- 
essed in which the symbol appears. Subse- 
quent GBLA, GBLB, or GBLC instructions 
processed by the assembler do not affect 
the value assigned to the SET symbol. 

The programmer should not define any 
global SET symbols whose first four charac- 
ters are SSYS. 

If a GBLA, GBLB, or GBLC instruction is 
part of a macro-definition, it must immedi- 
ately follow the prototype statement, or 
another GBLA, GBLB, or GBLC instruction. 
GBLA, GBLB, and GBLC instructions outside 
macro-definitions must appear after all 
macro-definitions in the source program, 
before all conditional assembly instruc- 
tions and PUNCH and REPRO statements out- 
side macro-definitions, and before the 
first control section of the program. 

All GBLA, GBLB, and GBLC instructions in 
a macro-definition must appear before all 
LCLA, LCLB, and LCLC instructions in that 



macro-definition. All GBLA, GBLB, and GBLC 
instructions outside macro-definitions must 
appear before all LCLA, LCLB, and LCLC 
instructions outside macro-definitions. 



Using Global and Local SET Symb o Is 

The following examples illustrate the 
use of global and local SET symbols. Each 
example consists of two parts. The first 
part is an assembler language source pro- 
gram. The second part shows the statements 
that would be generated by the assembler 
after it processed the statements in the 
source program. 

Example 1: This example illustrates how 
the same SET symbol can be used to communi- 
cate (1) values between statements in the 
same macro-definition , and (2) different 
values between statements outside macro- 
definitions. 



r T T 

I Name [Operation | Operand 



f 


_| X _ 




[MACRO 




1 6NAME ' 


1 LOADA 






ILCLA 


6A 


ISNAME 


|LR 


15, SA 


l&A 


jSETA 
JMEND 


&A+1 




1 

I LCLA 


SA 


I FIRST 


1 LOADA 






|LR 


15, gA 




1 LOADA 






|LR 


15, 6A 


L 


|END 

X 4_ 


FIRST 


r 


T T 


1 FIRST 


|LR 


15,0 




|LR 


15,0 




|LR 


15,0 




|LR 


15,0 




|END 


FIRST 



L X X J 

6A is defined as a local SETA symbol in 
a macro definition (statement 1) and 
outside macro definitions (statement 4) . 
SA is used twice within the macro 
definition (statements 2 and 3) and twice 
outside macro definitions (statements 5 and 
6). 

Since 6A is a local SETA symbol in the 
macro definition and outside macro 
definitions, it is one SETA symbol in the 
macro definition, and another SETA symbol 
outside macro definitions. Therefore , 
statement 3 (which is in the 
macro definition) does not affect the value 
used for 6A in statements 5 and 6 (which 
are outside macro definitions). Moreover, 
the use of LOADA between statements 5 and 6 
will alter &A from its' previous value as a 
local symbol within that macro definition 
since the first act of the macro definition 
is to LCLA &A to zero. 
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Example 2 ; This example illustrates how a 
SET symbol can be used to communicate 
values between statements that are part of 
a macro- definition and statements outside 
macro-definitions . 



I Operand j 



I Name j Operation 
I- + 





1 MACRO 


1 


I6NAME 


1 LOADA 


1 




1 GBLA 


|6A 


|£NAME 


|LR 


|15„gA 


|£A 


1 SETA 

I MEND 
1 


|£A+1 

1 
1 




1 

IGBIA 


1 
|6A 


1 FIRST 


1 LOADA 


1 




|LR 


|15,SA 




1 LOADA 


1 




|LR 


|15,&A 


L 


|END 
X -. _ 


1 FIRST 

L _ 


r 


t 


_ _^ _ _ _ 


1 FIRST 


|LR 


|15,0 




|LR 


|15,1 




|LR 


|15,1 




|LR 


|15,2 




|END 


1 FIRST 



j Name j Operation | Operand 
^ 1__ + 





1 MACRO 




6 NAME 


1 LOADA 






|LCLA 


£A 


6 NAME 


|LR 


15, gA 


6A 


|SETA 
IMEND 

1 MACRO 
1 LOADB 


SA+1 




|LCLA 


6A 




|LR 


15, 6A 


&A 


ISETA 
1 MEND 


6A+1 


FIRST 


1 LOADA 
1 LOADB 
1 LOADA 
1 LOADB 






|END 

_4. _ L 


FIRST 

L 




T r 


FIRST 


|LR 


15,0 




|LR 


15,0 




|LR 


15,0 




|LR 


15,0 




|END 


FIRST 



L JL i J 



gA is defined as a global SETA symbol in 
a macro-definition (statement 1) and out- 
side macro-definitions (statement 4) . gA 
is used twice within the macro-definition 
(statements 2 and 3) and twice outside 
macro-definitions (statements 5 and 6). 

Since gA is a global SETA symbol in the 
macro-definition and outside macro- 
definitions, it is the same SETA symbol in 
both cases. Therefore, statement 3 (which 
is in the macro-definition) affects the 
value used for gA in statements 5 and 6 
(which are outside macro-definitions) . 

Example 3 ; This example illustrates how 
the same SET symbol can be used to 
communicate: (1) values between statements 
in one macro-definition, and (2) different 
values between statements in a different 
macro-definition. 

gA is defined as a local SETA symbol in 
two different macro-definitions (statements 
1 and U) . gA is used twice within each 
macro-definition (statements 2, 3, 5, and 
6). 

Since gA is a local SETA symbol in each 
macro-definition, it is one SETA symbol in 
one macro-definition, and another SETA sym- 
bol in the other macro-definition. There- 
fore, statement 3 (which is in one 
macro-definition) does not affect the value 
used for gA in statement 5 (which is in the 
other macro-definition) . Similarly,, state- 
ment 6 does not affect the value used for 
gA in statement 2 . 



Example H : This example illustrates how a 
SET symbol can be used to communicate 
values between statements that are part of 
two different macro-definitions. 



[Name 
L_ _ 


1 Operation 
i. _ _ _ 


1 Operand 

_j _ _ 


r 


1 MACRO 


t — 
1 


1 gNAME 


1 LOADA 


1 




|GBLA 


|gA 


|gNAME 


|LR 


|15,gA 


|gA 


ISETA 
JMEND 

1 

1 MACRO 

I LOADB 


|gA+l 

1 

1 

1 

1 




IGBLA 


1 gA 




|LR 


|15,gA 


|gA 


ISETA 

JMEND 
i 


|gA+l 

1 
1 


1 FIRST 


1 

1 LOADA 
1 LOADB 
1 LOADA 
1 LOADB 


1 
1 
1 
1 
1 


L — _ 


|END 

L _ _ _ _ 


1 FIRST 
_j. _.^ 


r 


T 


t ~" — — 


1 FIRST 


ILR 


|15,0 




|LR 


|15,,1 




|LR 


115.2 




|LR 


115, 3 




|END 


1 FIRST 



L Jl.— _X ■ J 
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6A is defined as a global SETA symbol in 
two different macro-definitions (statements 
1 and 4). 8A is used twice within each 
macro-definition (statements 2, 3, 5 and 
6). 

Since 6A is a global SETA symbol in each 
macro-definition, it is the same SETA sym- 
bol in each macro-definition. Therefore, 

is in one 
the value used 
(v/hich is in the 
Similarly, state- 
used for SA in 



statement 3 (which 
macro-definition) affects 
for &A in statement 5 
other macro-definition) . 
ment 6 affects the value 
statement 2. 



Example 5; This example illustrates how 
the same SET symbol can be used to communi- 
cate: (1) values between statements in two 
different macro- definitions, and (2) dif- 
ferent values between statements outside 
macro-definitions . 



Since £A is a global SETA symbol in each 
macro-definition, it is the same SETA 
symbol in each macro- definition. However, 
since &A is a local SETA symbol outside 
macro-definitions, it is a different SETA 
symbol outside macro-definitions. 



is in the 

it does not 

statements 

outside 



Therefore, statement 3 (which is in one 
macro-definition) affects the value used 
for SA in statement 5 (which 
other macro-definition) , but 
affect the value used for 6A in 
8 and 9 (which are 
macro-definitions) . Similarly, statement 6 
affects the value used for 6A in statement 
2, but it does not affect the value used 
for 6A in statements 8 and 9. 



Subscripted SET Symbols 



r T T 

I Name | Operation | Operand 
j. + ^ 





1 MACRO 




I6NAME 


1 LOADA 






1 GBLA 


£A 


I6NAME 


|LR 


15, 6A 


l&A 


JSETA 

JMEND 

1 MACRO 
1 LOADB 


SA+1 




IGBLA 


£A 




|LR 


15, 6A 


|6A 


jSETA 
JMEND 


SA+1 




ILCLA 


6A 


1 FIRST 


1 LOADA 
1 LOADB 






|LR 


15, 6A 




1 LOADA 






1 LOADB 






|LR 


15, gA 




|END 


FIRST 


L 


_j. 




r — 


T 





1 FIRST 


|LR 


15,0 




|LR 


15,1 




|LR 


15,0 




|LR 


15,2 




JLR 


15,3 




|LR 


15,0 




|END 


FIRST 



L X JL J 



SA is defined as a global SETA symbol in 
two different macro-definitions (statements 
1 and 4) , but it is defined as a local SETA 
symbol outside macro-definitions (statement 
7). 6A is used twice within each macro- 
definition and twice outside macro- 
definitions (statements 2, 3, 5, 6, 8 and 
9). 



Both global and local SET symbols may be 
defined as subscripted SET symbols. The 
local SET symbols defined in Section 9 were 
all nonsubscripted SET symbols. 

Subscripted SET symbols provide the pro- 
grammer with a convenient way to use one 
SET symbol plus a subscript to refer to 
many arithmetic, binary, or character 
values. 

A subscripted SET symbol consists of a 
SET symbol immediately followed by a sub- 
script that is enclosed in parentheses. 
The subscript may be any arithmetic expres- 
sion that is allowed in the operand field 
of a SETA statement. The subscript may not 
be or negative. 

The following are valid subscripted SET 
symbols. 

&READER(17) 

6A23456(SS4) 

6X4F2(25+&A2) 

The following are invalid subscripted 
SET symbols. 



&X4F2 
(25) 
6XUF2 (25) 



(no subscript) 
(no SET symbol) 
(subscript does not 

immediately follow 

SET symbol) 



Defining Subscripted SET Symbols: If the 
programmer wants to use a subscripted SET 
symbol, he must write in a GBLA, GBLB, 
GBLC, LCLA, LCLB, or LCLC instruction, a 
SET symbol immediately followed by a deci- 
mal integer enclosed in parentheses. The 
decimal integer, called a dimension, indi- 
cates the number of SET variables associat- 
ed with the SET symbol. Every variable 
associated with a SET symbol is assigned an 
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initial value that is the same as the 
initial value assigned to the corresponding 
type of nonsubscripted SET symbol. 

If a subscripted SET symbol is defined 
as global, the same dimension must be used 
with the SET symbol each time it is defined 
as global. 

The maximum dimension that can be used 
with a SETA, SETB, or SETC symbol is 2500. 

A subscripted SET symbol may be used 
^nly if the declaration was subscripted; a 
nonsubscripted SET symbol may be used only 
if the declaration had no subscript. 



SYSTEM VARIABLE SYMBOLS 



System variable symbols are local vari- 
able symbols that are assigned values auto- 
matically by the assembler. There are 
three system variable symbols: SSYSNDX, 
gSYSECT, and gSYSLIST. System variable 
symbols may be used in the name, operation 
and operand fields of statements in macro- 
definitions, but not in statements outside 
macro-definitions. They may not be defined 
as symbolic parameters or SET symbols, nor 
may they be assigned values by SETA, SETB, 
and SETC instructions. 



The following statements define the 
global SET symbols SSBOX, 6WB0X, and SPSW, 
and the local SET symbol 6TSW. &SBOX has 
50 arithmetic variables associated with it, 
6WB0X has 20 character variables, SPSW and 
6TSW each have 230 binary variables. 



r T • T 

I Name | Operation | Operand 



jGBLA 
|GBLC 
|GBLB 
JLCLB 



|gSBOX(50) 
|£WBOX(20) 
|6PSW(230) 
|&TSW(230) 



SSYSNDX — Macro Instruction Index 



The system variable symbol SSYSNDX may 
be concatenated with other characters to 
create unique names for statements 
generated from the same model statement. 



SSYSNDX is assigned the four-digit num- 
ber 0001 for the first macro- instruction 
processed by the assembler, and it is 
incremented by one for each subsequent 
inner and outer macro instruction proc- 
essed. 



Usi n g Subscripted SET Symbols; After the 
programmer has associated a number of SET 
variables with a SET symbol, he may assign 
values to each of the variables and use 
them in other statements. 

If the statements in the previous exam- 
ple were part of a macro-definition, (and 
6A was defined as a SETA symbol in the same 
definition) , the following statements could 
be part of the same macro-definition. 



r 

I Name 

[• 



T T 

I Operation | Operand 



1 


1 SA 


|SETA 


|5 1 


2 


1 SPSW (6 A) 


|SETB 


j (6 LT 2) 1 


3 


|6TSW(9) 


|SETB 


|(6PSW{SA)) 1 


4 


1 


|A 


|2,=F'6SBOX(45)' | 


5 


1 


|CLI 


|AREA,C'SWB0X(17) ' | 




L 


_X 


i. J 



Statement 1 assigns the arithmetic value 
5 to the nonsubscripted SETA symbol SA. 
Statements 2 and 3 then assign the binary 
value to subscripted SETB symbols SPSW (5) 
and 6TSW(9), respectively. Statements 4 
and 5 generate statements that add the 
value assigned to SSB0X(U5) to general 
register 2, and compare the value assigned 
to 6WBOX(17) to the value stored at AREA, 
respectively. 



If SSYSNDX is used in a model statement, 
SETC or MNOTE instruction, or a character 
relation in a SETB or AIF instruction, the 
value substituted for SSYSNDX is the four- 
digit number of the macro-instruction being 
processed, including leading zeros. 

If SSYSNDX appears in arithmetic 
expressions (e.g., in the operand field of 



a SETA instruction) , the value 
SSYSNDX is an arithmetic value. 



used for 



Throughout one use of a macro- 
definition, the value of SSYSNDX may be 
considered a constant, independent of any 
inner macro-instruction in that definition. 

The example in the next column 
illustrates these rules. It is assumed 
that the first macro- instruction processed, 

OUTERl, is the 106th macro-instruction 
processed by the assembler. 

Statement 7 is the 106th macro- 
instruction processed. Therefore, SSYSNDX 
is assigned the number 0106 for that macro- 
instruction. The number 0106 is 
substituted for SSYSNDX when it is used in 
statements U and 6. Statement U is used to 
assign the character value 0106 to the SETC 
symbol SNDXNUM. Statement 6 is used to 
create the unique name B0106. 
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Name 



[Operation j Operand 



h 


-+ 


^ 




1 MACRO 






1 INNERl 






JGBLC 


1 6NDXNUM 


lASSYSNDX 


isR 


|2,5 




|CR 


|2,5 




|BE 


B6NDXNUM 




|B 


ASSYSNDX 




JMEND 






1 MACRO 




I6NAME 


1 OUTERl 






1 GBLC 


&NDXNUM 


1 SNDXNUM 


JSETC 


•SSYSNDX' 


l&NAME 


|SR 


12,4 




JAR 


|2,6 




1 INNERl 




IB6SYSNDX 

L 


is 

|MEND 
_ 1 


2,=F'1000* 

L 


r 


t 


r 


1 ALPHA 


1 OUTERl 




IBETA 


1 OUTERl 




I- 


-+ 


^ 


1 ALPHA 


|SR 


\2,H 




|AR 


\2,e 


IA0107 


JSR 


|2,5 




ICR 


|2,5 




|BE 


B0106 




|B 


[AOIO? 


IB0106 


|S 


2,=F'1000' 


1 BETA 


|SR 


|2,4 




|AR 


12,6 


IA0109 


|SR 


2, 5 




JCR 


|2,5 




|BE 


1B0108 




|B 


IA0109 


IB0108 


|s 


12,=F'1000' 



SSYSECT — Current control Section 



The system variable symbol SSYSECT may 
be used to represent the name of the 
control section in which a macro- 
instruction appears. For each inner and 
outer macro-instruction processed by the 
assembler, &SYSECT is assigned a value that 
is the name of the control section in which 
the macro-instruction appears. 



When SSYSECT is used in a macro- 
definition,, the value substituted for 
SSYSECT is the name of the last CSECT, 
DSECT, or START statement that occurs 
before the macro-instruction. If no named 
CSECT, DSECT, or START Statements occur 
before a macro-instruction, SSYSECT is 
assigned a null character value for that 
macro- instruction. 



CSECT or DSECT Statements processed in a 
macro-definition affect the value for 
SSYSECT for any subsequent inner macro- 
instructions in that definition, and for 
any other outer and inner macro- 
instructions . 



Throughout the use of a macro- 
definition, the value of SSYSECT may be 
considered a constant, independent of any 
CSECT or DSECT statements or inner macro- 
instructions in that definition. 



L . X X J 



The 
rules. 



next example illustrates these 



Statement 5 is the 107th macro- 
instruction processed. Therefore, SSYSNDX 
is assigned the number 0107 for that macro- 
instruction. The number 0107 is 
substituted for SSYSNDX when it is used in 
statements 1 and 3. The number 0106 is 
substituted for the global SETC symbol 
SNDXNUM in statement 2. 



Statement 8 is the 108th macro- 
instruction processed. Therefore, each 
occurrence of SSYSNDX is replaced by the 
number 0108. For example, statement 6 is 
used to create the unique name B0108. 



When statement 5 is used to process the 
108th macro-instruction, statement 5 
becomes the 109th macro-instruction proc- 
essed. Therefore, each occurrence of 
SSYSNDX is replaced by the number 0109. 
For example, statement 1 is used to create 
the unique name A0109. 



Statement 8 is the last CSECT, DSECT, or 
START statement processed before statement 
9 is processed. Therefore, SSYSECT is 
assigned the value MAINPROG for macro- 
instruction OUTERl in statement 9. 
MAINPROG is substituted for SSYSECT when it 
appears in statement 6 . 



Statement 3 is the last CSECT, DSECT, or 
START statement processed before statement 
4 is processed. Therefore, SSYSECT is 
assigned the value CSOUTl for macro- 
instruction INNER in statement 4. CSOUTl 
is substituted for SSYSECT when it appears 
in statement 2. 



Statement 1 is used to generate a CSECT 
statement for statement 4. This is the 
last CSECT, DSECT, or START Statement that 
appears before statement 5. Therefore, 
SSYSECT is assigned the value INA for 
macro-instruction INNER in statement 5. 
INA is substituted for SSYSECT when it 
appears in statement 2. 
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9 

10 



1 Name 


(Operation 


1 Operand 


L 


_.j. .^ 


_x 


r 


T 


t 




1 MACRO 


1 




1 INNER 


1 gINCSECT 


1 g INC SECT 


ICSECT 


1 




JDC 


|A(6SYSECT) 




JMEND 
1 


1 
1 




1 

1 MACRO 


1 

1 




1 OUTERl 


1 


ICSOUTI 


ICSECT 


i 




JDS 


liooc 




1 INNER 


jINA 




1 INNER 


|INB 




|DC 


|A(£SYSECT) 




JMEND 
1 


1 
1 




1 

1 MACRO 


1 
1 




1 OUTER 2 


1 




|DC 


|A(SSYSECT) 




IMEND 


1 




_j 


_i 




1 


T 


1 MAINPROG 


ICSECT 


1 




JDS 


|200C 




1 OUTERl 


1 




I0UTER2 


1 


L 


_j. 


_j. . 


r 


T 


t 


1 MAINPROG 


ICSECT 


1 




IDS 


I200C 


ICSOUTI 


JCSECT 


1 




IDS 


liooc 


IINA 


jCSECT 


1 




|DC 


|A(CS0UT1) 


|INB 


jcSECT 


1 




|DC 


lAClNA) 




JDC 


1 A (MAINPROG) 




|DC 


|A(INB) 



Statement 1 is used to generate a CSECT 
statement for statement 5. This is the 
last CSECT, DSECT, or START statement that 
appears before statement 10. Therefore, 
6SYSECT is assigned the value INB for 
macro instruction 0UTER2 in statement 10. 
INB is substituted for gSYSECT when it 
appears in statement 7. 



6SYSLIST(n) may be used to refer to the 
nth positional macro instruction operand. 
In addition, if the nth operand is a 
sublist, then &SYSLIST Cn,m) may be used 
to refer to the mth operand in the sublist. 
where n and m may be any arithmetic 
expressions allowed in the operand field 
of a SETA statement, m may be equal to or 
greater than 1 and n has a range of 1 to 
200. 

If the value of subscript n is zero , then 
&SYSLIST (n) is assigned the value specified 
in the name field of the macro instruction, 
except when it is a sequence symbol. 

The type, length, scaling, integer, and 
count attributes of gSYSLIST(n) and 
gSYSLIST(n,m) and the number attributes of 
SSYSLISTCn) and &SYSLIST may be used in 
conditional assembly instructions. 
N'&SYSLIST may be used to refer to the tot- 
al number of positional operands in a macro- 
instruction statement. N' gSYSLIST(n) may 
be used to refer to the number of operands 
in a sublist. If the nth operand is 
omitted, N' is zero; if the nth operand is 
not a sublist, N" is one. 

The following procedure is used to 
evaluate N" SSYSLIST: 



1. A sublist is considered to be one operapd, 

2. The count includes operands specifically 
omitted (by means of commas) . 



Examples: 

Macro Instruction 

MAC K1=DS 

MAC ,K1=DC 

MAC FULL, ,F, ( '1' , '2' ) ,K1=DC 

MAC , 
MAC 



N'&SYSLIST 


1 
4 
2 




6S YSLIST — Macro Instruction Ope rand 



Attributes are discussed 
ijnder "Attributes." 



in Section 



The system variable symbol SSYSLIST 
provides the programmer with an alternative 
to symbolic parameters for referring to 
positional macro instruction operands . 

&SYSLIST and symbolic parameters may be 
used in the same macro definition. 

SSYSLIST (0) may be used to refer to a 
symbolic parameter in the macro instruc- 
tion prototype. If the symbolic para- 
meter is omitted in the macro instruction 
prototype, then &SYSLIST(0) would refer 
to a null character value. 



KEYWORD MACRO DEFINITIONS AND INSTRUCTIONS 



Keyword macro definitions provide the 
programmer with an alternate way of prepar- 
ing macro definitions. 

A keyword macro definition enables a 
programmer to reduce the number of operands 
in each macro instruction that corresponds 
to the definition, and to write the oper- 
ands in any order. 



100 



The macro instructions that correspond 
to the macro definitions described in Sec- 
tion 7 (hereinafter called positional 
macro instructions and positional macro 
definitions, respectively) require the 
operands to be written in the same order as 
the corresponding symbolic parameters in 
the operand field of the prototype state- 
ment. 

In a keyword macro definition, the pro- 
grammer can assign standard values to any 
symbolic parameters that appear in the 
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operand field of the prototype statement. 
The standard value assigned to a symbolic 
parameter is substituted for the symbolic 
parameter, if the programmer does not write 
anything in the operand field of the macro 
instruction to correspond to the symbolic 
parameter. 

When a keyword macro instruction is 
written, the programmer need only write one 
operand for each symbolic parameter whose 
value he wants to change. 

Keyword macro definitions are prepared 
the same way as positional macro 
definitions, except that the prototype 
statement is written differently. The 
rules for preparing positional macro- 
definitions are in Section 7. 



The following keyword prototype state- 
ment contains a symbolic parameter in the 
name field, and four operands in the oper- 
and field. -The first two operands contain 
standard values. The mnemonic operation 
code is MOVE. 



r T T T 

I Name 1 Operation | Operand | 

^ + 1 ^ 

j&N I MOVE |6R=2,gA=S,gT=,6F= j 

I X X J 



Keyword Macro Instruction 



Keyword Prototype 



The format of this statement is: 

r T T 1 

I Name | Operation | Operand | 
|. 1 1 ^ 

lA symbolic |A symbol |One or more 

I parameter | (operands of the 

I or blank j jform described 

I I I below, separated 

I I I by commas 

L X X 



Each operand must consist of a symbolic 
parameter, immediately followed by an equal 
sign and optionally followed by a standard 
value. This value must not include a 
keyword. 

A standard value that is part of an 
operand must immediately follow the equal 
sign. 

Anything that may be used as an operand 
in a macro instruction except variable 
symbols, may be used as a standard value in 
a keyword prototype statement. The rules 
for forming valid macro instruction oper- 
ands are detailed in Section 8. 

The following are valid keyword proto- 
type operands. 

gREADER= 

g LOOP 2= SYMBOL 

gS4==F'4096' 

The following are invalid keyword proto- 
type operands. 



CARDAREA 
gTYPE 
gTWO =12 3 



gAREA= X'189A' 



(no symbolic parameter) 
(no equal sign) 
(equal sign does not 

immediately follow 

symbolic parameter) 
(standard value does 

not immediately follow 

equal sign) 



After a programmer has prepared a key- 
word macro definition he may use it by 
writing a keyword macro instruction. 



The format 
instruction is: 



of 



keyword macro 



H 



r T T 

I Name | Operation] Operand 

^ 1 + 

I A symbol, I Mnemonic jZero or more operands] 
I sequence | operation] of the form described] 
1 symbol, j code ] below, separated by j 
jor blank j ) commas j 

L X X J 



Each operand consists of a keyword 
immediately followed by an equal sign and 
an optional value which may not include a 
keyword. Anything that may be used as an 
operand in a positional macro instruction 
may be used as a value in a keyword 
macro- instruction. The rules for forming 
valid positional macro instruction operands 
are detailed in Section 8. 

A keyword consists of one through seven 
letters and digits, the first of which must 
be a letter. 

The keyword part of each keyword macro 
instruction operand must correspond to one 
of the symbolic parameters that appears in 
the operand field of the keyword prototype 
statement. A keyword corresponds to a 
symbolic parameter if the characters of the 
keyword are identical to the characters of 
the symbolic parameter that follow the 
ampersand. 



The following are valid 
instruction operands. 

L00P2=SYMB0L 
S4==F'409 6' 
T0= 



keyword macro 
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The following are invalid keyword macro- 
instruction operands. 



Name 



Operation 



Operand 



6XaF2=0(2,3) (keyword does not begin 
with a letter) 

CARDAREA=A+2 (keyword is more than 
seven characters) 

=(T0(8) , (FROM)) (no keyword) 



The operands in a keyword macro- 
instruction may be written in any order. 
If an operand appeared in a keyword 
prototype statement, a corresponding oper- 
and does not have to appear in the keyword 
macro-instruction. If an operand is omit- 
ted, the comma that would have separated it 
from the next operand need not be written. 

The following rules are used to replace 
the symbolic parameters in the statements 
of a keyword macro-definition. 

1. If a symbolic parameter appears in the 
name field of the prototype statement, 
and the name field of the macro- 
instruction contains a symbol, the 
symbolic parameter is replaced by the 
symbol. If the name field of the 
macro-instruction is blank or contains 
a sequence symbol, the symbolic 
parameter is replaced by a null char- 
acter value. 

2. If a symbolic parameter appears in the 
operand field of the prototype state- 
ment, and the macro-instruction con- 
tains a keyword that corresponds to 
the symbolic parameter, the value 
assigned to the keyword replaces the 
symbolic parameter. 

3. If a symbolic parameter was assigned a 
standard value by a prototype state- 
ment, and the macro-instruction does 
not contain a keyword that corresponds 
to the symbolic parameter, the stand- 
ard value assigned to the symbolic 
parameter replaces the symbolic param- 
eter. Otherwise, the synibolic param- 
eter is replaced by a null character 
value. 

Note 1 ; If a standard value is a self- 
defining term the type attribute assigned 
to the standard value is the letter N. If 
a standard value is omitted the type 
attribute assigned to the standard value is 
the letter O. All other standard values 
are assigned the type attribute U. 

No te 2 ; Positional parameters cannot be 
changed to keywords by substitution. That 
is, in the following example, the expression 
A=FB, statement 2, will be treated as a 
positional operand consisting of a character 
string in the generation of the MAC macro; 
it will not be treated as a keyword A with 
the value FB. 



&VALUE 



GBLC 
SETC 
MAC 



& VALUE I 
'A=FB' I 
&VALUE I 



The following keyword macro-definition, 
keyword macro-instruction, and generated 
statements illustrate these rules. 



r T T 

I Name | Operation | Operand 



\ 


-+ 

1 MACRO 


1 

1 


|6N 


|MOVE 


|SR=2,6A=S,6T=,&F= 


l&N 


1ST 


|gR,SA 




|L 


|SR,gF 




|ST 


|&R,gT 




|L 


|gR,£A 




|MEND 


1 


1 


-4- _ 


- 4. _ _ 


r ~ ■ 


T 


T 


|HERE 
L — - 


jMOVE 
-4. _ . 


1 T=FA, F=FB , A=THERE 
X 


r 


T 


t 


IHERE 


1ST 


1 2 , THERE 




|L 


|2,FB 




1ST 


|2,FA 




|L 


1 2 , THERE 


1 


-X 


X 



Statement 1 assigns the standard values 
2 and S to the symbolic parameters 6R and 
6A, respectively. Statement 6 assigns the 
values FA, FB, and THERE to the keywords T, 
F, and A, respectively. The symbol HERE is 
used in the name field of statement 6. 



Since a symbolic parameter (6N) appears 
in the name field of the prototype state- 
ment (statement 1) , and the corresponding 
characters (HERE) of the macro-instruction 
(statement 6) are a symbol, SN is replaced 
by HERE in statement 2 . 



Since ST appears 
of statement 1, and s 
the keyword (T) that c 
value assigned to T 
statement 4. Simil 
replace 6F and SA in 
statements 2 and 5, 
that the value assigne 
6 is used instead of 
&A in statement 1. 



in the operand field, 
tatement 6 contains 
orresponds to 6T, the 

(FA) replaces ST in 
arly, FB and THERE 
statement 3 and in 

respectively. Note 
d to &A in statement 
the value assigned to 



Since £R appears in the operand field of 
statement 1 , and statement 6 does not 
contain a corresponding keyword., the value 
assigned to SR (2) , replaces 6R in state- 
ments 2, 3, 4, and 5. 

Operand Sublists; The value assigned to a 
keyword and the standard value assigned to 
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a symbolic parameter may be an operand 
sublist. Anything that may be used as an 
operand sublist in a positional macro- 
instruction may be used as a value in a 
keyword macro-instruction and as a standard 
value in a keyword prototype statement. 
The rules for forming valid operand 
sublists are detailed in Section 8 under 
"Operand Sublists." 



r T 1 1 

I Name | Operation | Operand | 

|. 1 + ^ 

I £N I MOVE |6TY,6P,6R,STO=,gF= j 
L X X J 



Mixed-Mode Macro-Instruction 



Keyword Inner Macro Instructions; Keyword 
and positional inner macro instructions may 
be used as model statements in either 
keyword or positional macro definitions. 

MIXED-MODE MACRO DEFINITIONS AND 
INSTRUCTIONS 



Mixed-mode macro- definitions allow the 
programmer to use the features of keyword 
and positional macro definitions in the 
same macro definition. 



Mixed-mode macro definitions are pre- 
pared the same way as positional macro- 
definitions, except that the prototype 
statement is written differently. If &SYS- 
LIST is used, it refers only to the posi- 
tional operands in the macro instruction. 
Subscripting past the last positional 
parameter will yield an empty string and 
a type attribute of "O" . The rules for 
preparing positional macro definitions 
are in Section 7. 

Mixed-Mode Prototype 



The format of this statement is; 



Name 



■T T 

I Operation | Operand 



A symbolic |A 


symbol 


1 One or more oper- | 


parameter | 




1 ands of the form | 


or blank | 
1 
1 




[described below, | 
1 separated by j 
1 commas j 


X 




X J 



The operands must be valid operands of 
positional and keyword prototype 
statements. All the positional operands 
must precede the first keyword operand. 
The rules for forming positional operands 
are discussed in Section 1 , under 
"Macro-Instruction Prototype." The rules 
for forming keyword operands are discussed 
above under "Keyword Prototype. " 



The following sample mixed-mode 
prototype statement contains three posi- 
tional operands and two keyword operands. 



The format of a mixed-mode macro- 
instruction is: 

^ ^ ^ ^ 

I Name | Operation) Operand | 

|. ^ + ^ 

I A symbol, I Mnemonic | Zero or more operands] 
I sequence j operation] of the form described] 
1 symbol, j code ] below, separated by j 
jor blank j j commas j 

L X X J 



The operand field consists of two parts. 
The first part corresponds to the 
positional prototype operands. This part 
of the operand field is written in the same 
way that the operand field of a positional 
macro-instruction is written. The rules 
for writing positional macro-instructions 
are in Section 8. 

The second part of the operand field 
corresponds to the keyword prototype oper- 
ands. This part of the operand field is 
written in the same way that the operand 
field of a keyword macro-instruction is 
written. The rules for writing keyword 
macro-instructions are described above 
under "Keyword Macro-Instruction. " 

The following mixed-mode macro- 
definition, mixed-mode macro-instruction, 
and generated statements illustrate these 
facilities. 



r T T T 

jName ] Operation) Operand J 

|. + 1 ^ 

j j MACRO ] ) 

1 16N JMOVE ] 6TY,6P,£R,&TO=,6F= ) 
)6N jSTSTY ) gR,SAVE ) 
) JLSTY i 6R,gP6F j 
) jSTSTY ) 6R,6P&TO ) 
) JLgTY ) 6R,SAVE ] 
^ 1 + .1 

2 JHERE JMOVE j H, , 2 ,F=FB,TO=FA ) 
^ -I + ^ 

JHERE JSTH ) 2, SAVE ) 

) )LH ) 2,FB ) 

j jSTH j 2,FA j 

j JLH ] 2, SAVE ) 

L X X J 

The prototype statement (statement 1) 
contains three positional operands {&TY,6P, 
and 6R) and two keyword operands (STO and 
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gF) . In the macro instruction (statement 
2) the positional operands are written in 
the same order as the positional operands 
in the prototype statement (the second 
operand is omitted) . The keyword operands 
are written in an order that is different 
from the order of keyword operands in the 
prototype statement. 

Mixed-mode inner macro instructions may 
be used as model statements in mixed-mode, 
keyword, and positional macro-definitions. 
Keyword and positional inner macro- 
instructions may be used as model 
statements in mixed-mode macro definitions. 



MACRO DEFINITION COMPATIBILITY 



Macro definitions prepared for use with 
the other System/360 assemblers having 
macro language facilities may be used with 
the Operating System/360 assembler provided 
that all SET symbols are defined in an 
appropriate LCLB, GBLA, GBLB, or GBLC 
statement. The AIFB and AGOB instructions 
will be processed by the Operating 
System/3 60 assembler the same way that the 
AIF and AGO instructions are processed. 
AIFB and AGOB instructions will cause the 
count set up by the ACTR instructions to be 
decremented in exactly the same way as the 
AGO and AIF instructions. 
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APPENDIX B: HEXADECIMAL-DECIMAL NUMBER CONVERSION TABLE 

APPENDIX C: MACHINE- INSTRUCTION FORMAT 

APPENDIX D: MACHINE- INSTRUCTION MNEMONIC OPERATION CODES 

APPENDIX E: ASSEMBLER INSTRUCTIONS 

APPENDIX F: SUMMARY OF CONSTANTS 

APPENDIX G: MACRO LANGUAGE SUMMARY 

APPENDIX H: SAMPLE PROGRAM 

APPENDIX I: ASSEMBLER LANGUAGES — FEATURES COMPARISON CHART 

APPENDIX J: SAMPLE MACRO DEFINITIONS 



APPENDIX A: CHARACTER CODES 



r 1 


r T T T 


1 System/360 


Character Set 






EBCDIC 


1 8-bit 


Punch 




Hexa- 


Printer 


1 Code 


Combination 


Decimal 


Decimal 


Graphics 


L 


^ 








r 1 




, 








1 00000000 


12,0,9,8,1 





00 




1 00000001 


12,9,1 


1 


01 




1 00000010 


12,9,2 


2 


02 




1 00000011 


12,9,3 


3 


03 




1 00000100 


12,9, t» 


4 


04 




1 00000101 


12,9,5 


5 


05 




1 00000110 


12,9,6 


6 


06 




1 00000111 


12,9,7 


7 


07 




1 00001000 


12,9,8 


8 


08 




1 00001001 


12,9,8,1 


9 


09 




1 00001010 


12,9,8,2 


10 


OA 




1 00001011 


12,9,8,3 


11 


OB 




1 00001100 


12,9,8,4 


12 


OC 




1 00001101 


12,9,8,5 


13 


OD 




1 00001110 


12,9,8,6 


14 


OE 




1 00001111 


12,9,8,7 


15 


OF 




1 00010000 


12,11,9,8,1 


16 


10 




1 00010001 


11,9,1 


17 


11 




1 00010010 


11,9,2 


18 


12 




1 00010011 


11,9,3 


19 


13 




1 00010100 


11,9, U 


20 


14 




1 00010101 


11,9,5 


21 


15 




1 00010110 


11,9,6 


22 


16 




1 00010111 


11,9,7 


23 


17 




1 00011000 


11,9,8 


24 


18 




1 00011001 


11,9,8,1 


25 


19 




1 00011010 


11,9,8,2 


26 


lA 




1 00011011 


11,9,8,3 


27 


IB 




1 00011100 


11,9,8,4 


28 


IC 




1 00011101 


11,9,8,5 


29 


ID 




1 00011110 


11,9,8,6 


30 


IE 




1 00011111 


11,9,8,7 


31 


IF 




1 00100000 


11,0,9,8,1 


32 


20 




1 00100001 


0,9,1 


33 


21 




1 00100010 


0,9,2 


34 


22 




1 00100011 


0,9,3 


35 


23 




1 00100100 


0,9,4 


36 


24 




1 00100101 


0,9,5 


37 


25 




1 00100110 


0,9,6 


38 


26 




1 00100111 


0,9,7 


39 


27 




1 00101000 


0,9,8 


40 


28 




1 00101001 


0,9,8,1 


41 


29 




1 00101010 


0,9,8,2 


42 


2A 




1 00101011 


0,9,8,3 


43 


2B 




1 00101100 


0,9,8,4 


44 


2C 




1 00101101 


0,9,8,5 


45 


2D 




1 00101110 


0,9,8,6 


46 


2E 




1 00101111 


0,9,8,7 


47 


2F 




1 00110000 


12,11,0,9,8,1 


48 


30 




1 00110001 


9.1 


49 


31 




1 00110010 


9,2 


50 


32 





«■ X ± X X J 
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^„ . ^ . ^ y ^ — 


T 


1 Systeni/360 


Character Set 








EBCDIC i 


1 8-bit 


Punch 




Hexa- 




Printer | 


1 Code 

i 


Combination 


Decimal 




Decimal 





Graphics | 
i 




: 









1 


1 00110011 


9,3 


51 


33 






1 00110100 


9,U 


52 


34 






1 00110101 


9,5 


53 


35 






1 00110110 


9.6 


5U 


36 






1 00110111 


9,7 


55 


37 






1 00111000 


9,8 


56 


38 






1 00111001 


9,8,1 


57 


39 






1 00111010 


9.8,2 


58 


3A 






1 00111011 


9.8.3 


59 


3B 






1 00111100 


9.8,4 


60 


3C 






1 00111101 


9,8.5 


61 


3D 






1 00111110 


9.8,6 


62 


3E 






1 00111111 


9,8.7 


63 


3F 






1 01000000 




6a 


40 


(blank) 1 


1 01000001 


12,0,9,1 


65 


41 






1 01000010 


12,0,9,2 


66 


42 






1 01000011 


12,0,9.3 


67 


43 






1 01000100 


12.0.9.1J 


68 


44 






1 01000101 


12,0,9,5 


69 


45 






1 01000110 


12,0,9,6 


70 


46 






1 01000111 


12,0.9.7 


71 


47 






1 01001000 


12,0.9.8 


72 


48 






1 01001001 


12.8,1 


73 


49 






1 01001010 


12.8.2 


74 


4A 


^ 


(cent sign) j 


1 01001011 


12,8,3 


75 


4B 


. 


(period) | 


1 01001100 


12. 8, U 


76 


4C 


< 




1 oiooiioi 


12,8,5 


77 


4D 


( 




1 01001110 


12,8,6 


78 


4E 


+ 




1 01001111 


12,8,7 


79 


4F 


1 


(logical OR) | 


1 01010000 


12 


80 


5 


i 




1 01010001 


12.11.9,1 


81 


51 






1 01010010 


12,11,9,2 


82 


52 






1 01010011 


12.11,9,3 


83 


53 






1 01010100 


12.11.9,U 


84 


54 






1 01010101 


12,11,9,5 


85 


55 






1 01010110 


12,11,9,6 


86 


56 






1 01010111 


12,11,9,7 


87 


57 






1 01011000 


12,11,9,8 


88 


58 






1 01011001 


11,8,1 


89 


59 






1 01011010 


11,8,2 


90 


5A 


1 




1 01011011 


11,8,3 


91 


5B 


$ 




1 01011100 


11.8, t» 


92 


5C 


* 




1 01011101 


11,8,5 


93 


5D 


) 




1 01011110 


11,8,6 


94 


5E 


} 




1 01011111 


11,8,7 


95 


5F 


—1 


(logical NOT) i 


I 01100000 


11 


96 


60 


- 


(hyphen) i 


1 01100001 


0,1 


97 


61 


/ 




1 01100010 


11,0,9,2 


98 


62 






1 O'llOOOll 


11.0.9,3 


99 


63 






1 01100100 


11.0.9.4 


100 


64 






1 01100101 


11.0.9.5 


101 


65 






1 01100110 


11,0.9,6 


102 


66 






1 01100111 


11.0.9,7 


10 3 


67 






1 01101000 


11,0,9,8 


104 


68 






1 01101001 


0,8.1 


105 


69 






1 01101010 


12,11 


106 


6A 






1 01101011 


0.8,3 


107 


63 


, 


(comma) | 


L J 


L J 


__________ 


L J 


L 


J 



108 



f T 


T T T 


wnw^^M.*..,.^ «••«■«.• 


1 System/360 


Character 


Set 








EBCDIC 


i 8-bit 


Punch 






Hexa- 




Printer 


1 Code 

i_ J 


Combination 


Decimal 

._ 


Decimal 

«.. 





Graphics 


r 


_^_ 












1 01101100 


0,8,4 




108 


6C 


% 




1 01101101 


0,8,5 




109 


6D 




(underscore) 


i 01101110 


0,8,6 




110 


6E 


> 




! 01101111 


0,8,7 




111 


6F 


? 




1 01110000 


12,11,0 




112 


70 






} 01110001 


12,11,0,9. 


1 


113 


71 






1 01110010 


12,11,0,9. 


2 


114 


72 






1 01110011 


12,11,0.9, 


3 


115 


73 






1 01110100 


12,11,0,9. 


4 


116 


74 






1 01110101 


12,11,0,9, 


5 


117 


75 






1 01110110 


12,11,0,9. 


6 


118 


76 






1 01110111 


12,11,0,9. 


7 


119 


77 






1 01111000 


12,11,0,9, 


8 


120 


78 






1 01111001 


8,1 




121 


79 






1 01111010 


8,2 




122 


7A 


° 




1 01111011 


8,3 




123 


7B 


# 




1 01111100 


8, a 




124 


7C 


a 




1 01111101 


8,5 




125 


7D 


« 


(apostrophe) 


1 01111110 


8,6 




126 


7E 


= 




1 01111111 


8,7 




127 


7F 


II 




1 10000000 


12,0,8,1 




128 


80 






1 10000001 


12,0,1 




129 


81 


a 




1 10000010 


12,0,2 




130 


82 


b 




1 10000011 


12,0,3 




131 


83 


c 




1 10000100 


12,0,U 




132 


84 


d 




1 10000101 


12,0,5 




133 


85 


e 




1 10000110 


12,0,6 




134 


86 


f 




1 10000111 


12,0,7 




135 


87 


g 




1 10001000 


12,0,8 




136 


88 


h 




i 10001001 


12,0,9 




137 


89 


i 




i 10001010 


12,0,8,2 




138 


8A 






i 10001011 


12,0,8,3 




139 


SB 






1 10001100 


12,0,8,4 




140 


8C 






! 10001101 


12,0,8,5 




141 


8D 






1 10001110 


12,0,8,6 




142 


8E 






1 10001111 


12,0,8,7 




143 


8F 






1 10010000 


12,11,8,1 




144 


90 






1 10010001 


12,11,1 




145 


91 


J 




! 10010010 


12,11,2 




146 


92 


k 




1 10010011 


12,11,3 




147 


93 


1 




1 10010100 


12,11,4 




148 


94 


m 




i 10010101 


12,11,5 




149 


95 


n 




! 10010110 


12,11,6 




150 


96 


o 




j 10010111 


12,11,7 




151 


97 


P 




1 10011000 


12,11,8 




152 


98 


q 




i lOOllOOl 


12,11,9 




153 


99 


r 




1 10011010 


12,11,8,2 




154 


9A 






1 10011011 


12,11,8,3 




155 


93 






1 10011100 


12,11,8,4 




156 


9C 






1 10011101 


12,11,8,5 




157 


9D 






) 10011110 


12,11,8,6 




158 


9E 






1 10011111 


12,11,8,7 




159 


9F 






t 10100000 


11,0,8,1 




160 


AO 






! 10100001 


11,0,1 




161 


Al 






i 10100010 


11,0,2 




162 


A2 


s 




1 10100011 


11,0,3 




163 


A3 


t 




1 10100100 


11,0,4 




164 


A4 


u 





•H 



I X X X X J 
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r T ■ T T T " 


"" 1 


1 Systein/360 


Character Set 






EBCDIC 




1 8-bit 


Punch 




Hexa- 


Printer 




1 Code 


Combination 


Decimal 


Decimal 


Graphics 

_' 


J 


f* *"'""■*""'""*"'*'"■"' "*■■"■ ' 


. ___. 


1 «l.^-> ■■■ ■!■ ^«B« 








1 


1 10100101 


11,0,5 


165 


A5 


V 






11,0,6 


166 


A6 


w 




1 10100111 


11,0,7 


167 


A7 


X 




1 10101000 


11,0,8 


168 


A8 


y 




1 10101001 


11,0,9 


169 


A9 


z 




1 10101010 


11,0,8,2 


170 


AA 






1 10101011 


11,0,8,3 


171 


AB 






1 10101100 


11,0, 8, a 


172 


AC 






1 10101101 


11,0,8,5 


173 


AD 






1 10101110 


11,0,8,6 


174 


AE 






1 10101111 


11,0,8,7 


175 


AF 






1 10110000 


12,11,0,8,1 


176 


BO 






1 10110001 


12,11,0,1 


177 


Bl 






1 10110010 


12,11,0,2 


178 


B2 






1 10110011 


12,11,0,3 


179 


B3 






1 10110100 


12, 11,0, a 


180 


B4 






1 10110101 


12,11,0,5 


181 


B5 






1 10110110 


12,11,0,6 


182 


B6 






1 10110111 


12,11,0,7 


183 


B7 






1 10111000 


12,11,0,8 


18U 


B8 






1 10111001 


12,11,0,9 


185 


B9 






1 10111010 


12,11,0,8,2 


186 


BA 






1 10111011 


12,11.0.8,3 


187 


BB 






1 10111100 


12, 11.0, 8. tJ 


188 


BC 






1 10111101 


12,11,0,8,5 


189 


BD 






1 10111110 


12,11.0,8,6 


190 


BE 






1 10111111 


12,11,0,8,7 


191 


BF 






1 11000000 


12,0 


192 


CO 






1 11000001 


12,1 


193 


CI 


A 




1 11000010 


12,2 


19U 


C2 


B 




1 11000011 


12,3 


195 


C3 


C 




1 11000100 


12,4 


196 


CU 


D 




1 11000101 


12,5 


197 


C5 


E 




1 11000110 


12,6 


198 


C6 


F 




1 11000111 


12,7 


199 


C7 


G 




1 11001000 


12,8 


200 


C8 


H 




1 11001001 


12,9 


201 


C9 


I 




1 11001010 


12.0,9.8,2 


202 


CA 






1 11001011 


12,0,9,8,3 


203 


CB 






1 11001100 


12, 0,9. 8, U 


204 


CC 






i 11001101 


12,0,9,8,5 


205 


CD 






1 11001110 


12,0,9,8,6 


206 


CE 






1 11001111 


12,0,9,8.7 


207 


CF 






1 11010000 


11,0 


208 


DO 






1 11010001 


11,1 


209 


Dl 


J 




i 11010010 


11,2 


210 


D2 


K 




1 11010011 


11,3 


211 


D3 


L 




1 11010100 


11, U 


212 


D4 


M 




1 11010101 


11,5 1 


213 


D5 


N 




1 11010110 


11,6 


214 


D6 







1 11010111 


11,7 1 


215 


D7 


P 




1 11011000 


11,8 


216 


D8 


Q 




1 11011001 


11,9 


217 


D9 


R 




1 11011010 


12,11,9,8,2 


218 


DA 






1 11011011 


12,11,9,8,3 


219 


DB 






1 11011100 


12, 11. 9, 8, U 


220 


DC 






1 11011101 


12,11,9,8,5 


221 


DD 






L 


L.^ J 


L . J 





. 


J 



110 



"T 



System/360 


Character Set 








EBCDIC 


8-bit 


Punch 






Hexa- 




Printer 


Code 


Combination 


Decimal 


Decimal 




Graphics 







~" 



















___. 


._.— . 


***^'^ " ^ "" '" ** 


11011110 


12,11,9,8,6 




222 


DE 






11011111 


12,11,9,8,7 




223 


DF 






11100000 


0,8,2 




224 


EO 






11100001 


11,0,9.1 




225 


El 






11100010 


0,2 




226 


E2 


S 




11100011 


0,3 




227 


E3 


T 




11100100 


0,4 




228 


E4 


U 




11100101 


0,5 




229 


E5 


V 




11100110 


0,6 




230 


E6 


w 




11100111 


0,7 




231 


E7 


X 




11101000 


0,8 




232 


E8 


Y 




11101001 


0,9 




233 


E9 


Z 




11101010 


11,0,9,8,2 




234 


EA 






11101011 


11,0,9,8,3 




235 


EB 






11101100 


11,0,9,8,4 




236 


EC 






11101101 


11,0,9,8,5 




237 


ED 






11101110 


11,0,9,8,6 




238 


EE 






11101111 


11,0,9,8,7 




239 


EF 






11110000 







240 


FO 







11110001 


1 




241 


Fl 


1 




11110010 


2 




242 


F2 


2 




11110011 


3 




243 


F3 


3 




11110100 


U 




244 


F4 


4 




11110101 


5 




245 


F5 


5 




11110110 


6 




246 


F6 


6 




11110111 


7 




247 


F7 


7 




11111000 


8 




248 


F8 


8 




11111001 


9 




249 


F9 


9 




11111010 


12,11,0,9,8, 


2 


250 


FA 






11111011 


12,11,0,9,8, 


3 


251 


FB 






11111100 


12,11,0.9,8, 


U 


252 


FC 






11111101 


12,11,0,9,8, 


5 


253 


FD 






11111110 


12,11.0,9,8, 


6 


254 


FE 






11111111 


12,11,0.9.8^ 


7 


255 


FF 







L X 



X X J 



Speciol Graphic Chorocters 

C Cent Sign 

Period, Decimal Point 

^ Less-than Sign 

( Left Parenthesis 

+ Plus Sign 

I Vertical Bar, Logical OR 

& Ampersand 

I Exclamation Point 

$ Dollar Sign 



* Asterisk 
) Right Parenthesis 
; Semicolon 
— • Logical NOT 
~ Minus Sign, Hyphen 
/ Slash 
' Comma 
% Percent 
Underscore 



^ Greater-than Sign 

? Question Mark 

Colon 

# Number Sign 

@ At Sign 

I Prime, Apostrophe 

= Equal Sign 

" Quotation Mork 



Examples 



Type 



Bit Pottern 
Bit Positions 
01 23 4567 



Hole Pattern 



Zone Punches 



Digit Punches 



PF 



Control Character 



00 00 0100 



12-9-4 



Special Grophic 



01 10 1100 



0-8-4 



Upper Cose 



11 01 1001 



11^9 



Lower Case 



10 00 0001 



12-0-1 



Control Character, 
function not yet 
assigned 



00 11 0000 



12-11-0 -9-8-1 

I 
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APPENDIX B: HEX/^ECIMAL-DECIMAL NUMBER CONVERSION TABLE 



The table in this appendix provides for direct conversion of decimal 
numbers in these ranges: 



and hexadecimal 



r T n 

I Hexadecimal | Decimal | 
y :). ^ 

I 000 to FFF I 0000 to 4095 j 

L J J 



Decimal numbers (0000-4095) are given within the 5-part table. The first two characters 
(high-order) of hexadecimal numbers (000-FFF) are given in the lefthand column of the 
table; the third character (x) is arranged across the top of each part of the table. 

To find the decimal equivalent of the hexadecimal number 0C9, look for OC in the left 
column, and across that row under the column for x = 9. The decimal number is 0201. 

To convert from decimal to hexadecimal, look up the decimal number within the table 
and read the hexadecimal number by a combination of the hex characters in the left 
column, and the value for x at the top of the column containing the decimal number. For 
example, the decimal number 123 has the hexadecimal equivalent of, 07B; the decimal 
number 1478 has the hexadecimal equivalent of 5C6. 

For numbers outside the range of the table,, add the following values to the table 



r- 

1 


Hexadecimal 


-T- 
1 


Decimal 


-• 1 
1 


K 


1000 
2000 
3000 
4000 
5000 
6000 
7000 
8000 
9000 
AOOO 
BO 00 
COOO 
DO 00 
EOOO 
FOOO 


-+- 


4096 
8192 
12288 
16384 
20480 
24576 
28672 
32768 
36864 
40960 
45056 
49152 
53248 
57344 
61440 


--1 


L_ 




-X_ 




-J 
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X - 


1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D 


£ 


F 


OOx 

Olx 
02x 
03x 


0000 
00)6 
0032 
0048 


0001 
0017 
0033 
0049 


0002 
0018 
0034 
0050 


0003 
0019 
0035 
0051 


0004 
0020 
0036 
0052 


0005 
0021 
0037 
0053 


0006 
0022 
0038 
0054 


0007 
0023 
0039 
0055 


0008 
0024 
0040 
0056 


0009 
0025 
0041 
0057 


0010 
0026 
0042 
0058 


0011 
0027 
0043 
0059 


0012 
0028 
0044 
0060 


0013 
0029 
0045 
0061 


0014 
0030 
0046 
0062 


0015 
0031 
0047 
006: 


04x 
05x 
06x 
67x 


0064 
0080 
0096 
0112 


0065 
0031 
0097 
0113 


0066 
0082 
0098 
0114 


0067 
0083 
0099 
0115 


0068 
0084 
0100 
0116 


0069 
0085 
0101 
0117 


0070 
0086 
0102 
0118 


0071 
0087 
0103 
0t19 


0072 
0088 
0104 
0120 


0073 
0089 
0105 
0121 


0074 
0090 
0106 
0122 


0075 
0091 
0107 
0123 


0076 
0092 
0108 
0124 


0077 
0093 
0109 
0125 


0078 
0094 
0110 
0126 


007V 
0090 
0111 
0127 


08x 
09x 
OAx 
OBx 


0128 
0144 
0160 
0176 


0129 
0145 
0161 
0177 


0130 
0146 
0162 
0178 


0131 
0147 
0163 
0179 


0132 
0148 
0164 
0180 


0133 
0149 
0165 
0181 


0134 
0150 
0166 
0182 


0135 
0151 
0167 
0183 


0136 
0152 
0168 
0184 


0137 
0153 
0169 
0185 


0138 
0154 
0170 
0186 


0139 
0155 
0171 
0187 


0140 
0156 
0172 
0188 


0141 
0157 
0173 
0189 


0142 
0158 
0174 
0190 


0143 
0153 
0175 
0191 


OCX 
ODx 
OEx 
OFx 


0192 
0208 
0224 
0240 


0193 
0209 
0225 
0241 


0194 
0210 
0226 
0242 


0195 
0211 
0227 
0243 


0196 
0212 
0228 
0244 


0197 
0213 
0229 

0245 


0198 
0214 
0230 
0246 


0199 
0215 
0231 
0247 


0200 
0216 
0232 
0248 


0201 
0217 
0233 
0249 


0202 
0218 
0234 
0250 


0203 
0219 
0235 
0251 


0204 
0220 
0236 
0252 


0205 
0221 
0237 
0253 


0206 
0222 
0238 
0254 


0207 
0223 
0239 
0255 


lOx 
11x 
12x 
13x 


0256 
0272 
0288 
0304 


0257 
0273 
0289 
0305 


0258 
0274 
0290 
0306 


0259 
02 75 
0291 
0307 


0260 
0276 
0292 
0308 


0261 
0277 
0293 
0309 


0262 
0278 
0294 
0310 


0263 
0279 
0295 
0311 


0264 
0280 
0296 
0312 


0265 
0281 
0297 
0313 


0266 
0282 
0298 
0314 


0267 
0283 
0299 
0315 


0268 
0284 
0300 
0316 


0269 
0285 
0301 
0317 


0270 
0286 
0302 
0318 


0271 
0287 
0303 
0319 


1<tx 
15x 
16x 
17x 


0320 
0336 
0352 
0368 


0321 
0337 
0353 
0369 


0322 
0338 
0354 
0370 


0323 
0339 
0355 
0371 


0324 
0340 
0356 
0372 


0325 
0341 
0357 
0373 


0326 
0342 
0358 
0374 


0327 
0343 
0359 
0375 


0328 
0344 
0360 
0376 


0329 
0345 
0361 
0377 


0330 
0346 
0362 
0378 


0331 
0347 
0363 
0379 


0332 
0348 
0364 
0380 


0333 
0349 
0365 
0381 


0334 
0350 
0366 
0382 


0335 
0351 
0367 
0383 


18x 
I9x 
1AX 
IBx 


0384 
0400 
0416 
0432 


0395 
0401 
0417 
0433 


0386 
0402 
0418 
0434 


0387 
0403 
041? 
04 35 


0388 
0404 
0420 
0436 


0389 
0405 
0421 
0437 


0390 
0406 
0422 
0438 


0391 
0407 
0423 
0439 


0392 
0408 
0424 
0440 


0393 
0409 
0425 
0441 


0394 
0410 
0426 
0442 


0395 
0411 
0427 
0443 


0396 
0412 
0428 
0444 


0397 
0413 
0429 
0445 


0398 
0414 
0430 
0446 


0399 
0415 
0431 
0447 


tCx 
IDx 
lEx 
IFx 


0448 
0464 
0480 
0496 


0449 
0465 
0481 
0497 


0450 
0466 
0482 
0498 


0451 
0467 
04 83 
04 99 


0452 
0468 
0484 
0500 


0453 
0469 
0485 
0501 


0454 
0470 
0486 
0502 


0455 
0471 
0487 
0503 


0456 
0472 
0488 
0504 


0457 
0473 
0489 
0505 


0458 
0474 
0490 
0506 


0459 
0475 
0491 
0507 


0460 
0476 
0492 
0508 


0461 
0477 
0493 
0509 


0462 
0478 
0494 
0510 


0U6? 
047^ 
04i»5 
0511 


20x 
.21x 
22x 
23x 


0512 
0528 
0544 
0560 


0513 
0529 
0545 
0561 


0514 
0530 
0546 
0562 


0515 
0531 
05'47 
0563 


0516 
0532 
0548 
0564 


0517 
0533 
0549 
0565 


0518 
0534 
0550 
0S66 


0519 
0535 
0551 
0567 


0520 
0536 
0552 
0568 


0521 
0537 
0553 
0569 


0522 
0538 
0554 
0570 


0523 
0539 
0555 
0571 


0524 
0540 
0556 
0572 


0525 
0541 
0557 
0573 


0526 
0542 
0558 
0574 


0527 
0543 
0559 
0575 


3«x 
35x 
2«x 
27x 


0576 
0592 
0608 
0624 


0577 
0593 
0609 
0625 


0578 
0594 
0610 
0626 


0579 
0595 
0611 
0627 


0580 
0596 
0612 
0628 


0581 
0597 
0613 
0629 


0582 
0598 
0614 
0630 


0583 
0599 
0615 
0631 


0584 
0600 
0616 
0632 


0585 
0601 
0617 
0633 


0596 
0602 
0618 
0634 


0587 
0603 
0619 
0635 


0588 
0604 
0620 
0636 


0589 
0605 
0621 
0637 


0590 
0606 
0622 
0638 


0591 
0607 
0623 
0639 


28x 
29x 
2Ax 
2BX 


0640 
0656 
0672 
0688 


0641 
0657 
0673 
0689 


0642 
0658 
0674 
0690 


0643 
0659 
0675 
0691 


0644 
0660 
0676 
0692 


0645 
0661 
0677 
0693 


0646 
0662 
0678 
0694 


0647 
0663 
0679 
0695 


0648 
0664 
0680 
0696 


0649 
0665 
0681 
0697 


0650 
0666 
0632 
0698 


0651 
0667 
0683 
0699 


0652 
0668 
0684 
0700 


0653 
0669 
0685 
0701 


0654 
0670 
0686 
0702 


0655 
0671 
0687 
0703 


2Cx 
20X 
2Zx 

2rx 


0704 
0720 
0736 
0752 


0705 
0721 
0737 
0753 


0706 
0722 
0738 
0754 


0707 
0723 
0739 
0755 


0708 
0724 
0740 
0756 


0709 
0725 
0741 
0757 


0710 
0726 
0742 
0758 


0711 
0727 
0743 
0759 


0712 
0728 
0744 
0760 


0713 
0729 
0745 
0761 


0714 
0730 
0746 
0762 


0715 
0731 
0747 
0763 


0716 
0732 
0748 
0764 


0717 
0733 
0749 
0765 


0718 
0734 
0750 
0766 


0719 
0735 
0751 
0767 


30x 
31x 
32x 
33x 


0768 
0784 
0800 
0816 


0769 
0785 
0801 
0817 


0770 
0786 
0802 
0818 


0771 
0787 
0803 
0819 


0772 
0788 
0804 
0820 


0773 
0789 
0805 
0821 


0774 
0790 
0806 
0822 


0775 
0791 
0807 
0823 


0^76 
0792 
0808 
0824 


0777 
0793 
0809 
0825 


0778 
0794 
0810 
0826 


0779 
0795 
0811 
0827 


0780 
0796 
0812 
0828 


0781 
0797 
0813 
0829 


0782 
0798 
0814 
0830 


0783 
0799 
0815 
0831 


3«x 
35x 
36x 
37x 


0832 
0848 
0864 
0880 


0833 
0849 
086$ 
0881 


0834 
0850 
0866 
0882 


0835 
0851 
0867 
0883 


0836 
0852 
0868 
0884 


0837 
0853 
0869 
0885 


0838 
0854 
0870 
0886 


0839 
0855 
0871 
0887 


0840 
0856 
0872 
0888 


0841 
0857 
0873 
0889 


0842 
0858 
0874 
0890 


0843 
0859 
0875 
0891 


0844 
0860 
0876 
0892 


0845 
0861 
0877 
0893 


0846 
0862 
0878 
0894 


0847 
0863 
0879 
0895 


38x 
39x 
3Ax 

3BX 


0896 
0912 
0928 
0944 


0897 
0913 
0929 
0945 


0898 
0914 
0930 
0946 


0899 
0915 
0931 
0947 


0900 
0916 
0932 
0948 


0901 
0917 
0933 
0949 


0902 
0918 
0934 
0950 


0903 
0919 
0935 
0951 


0904 
0920 
0936 
0952 


0905 
0921 
0937 
0953 


0906 
0922 
0938 
0954 


0907 
0923 
0939 
0955 


0908 
0924 
0940 
0956 


0909 
0925 
0941 
0957 


0910 
0926 
0942 
0958 


0911 
0S27 
0943 
0959 


3Cx 
3Dx 
3EX 
3FX 


0960 
0976 
0992 
1008 


0961 
0977 
0993 
1009 


0962 
0978 
0994 
1010 


0963 
0979 
0995 
1011 


0964 
0980 
0996 
1012 


0965 
0981 
0997 
1013 


0966 
0982 
0998 
1014 


0967 
0983 
0999 
1015 


0968 
0984 
1000 
1016 


0969 
0985 
1001 
1017 


0970 
0986 
1002 
1018 


0971 
0987 
1003 
1019 


0972 
0988 
1004 
1020 


0973 
0989 
1005 
1021 


0974 
0990 
1006 
1022 


0975 
0991 
1007 
1023 



114 





X - 


1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D 


E 


F 


iiOx 


1024 


1025 


1026 


1027 


1028 


1029 


1030 


1031 


1032 


1033 


1034 


1035 


1036 


1037 


1038 


1039 


«1x 


1040 


1041 


1042 


1043 


1044 


1045 


1046 


1047 


1048 


1049 


1050 


1051 


1052 


1053 


1054 


1055 


<l2x 


1056 


1057 


1058 


1059 


1060 


1061 


1062 


1063 


1064 


1065 


1066 


1067 


1068 


1069 


1070 


1071 


H3x 


1072 


1073 


1074 


1075 


1076 


1077 


1078 


1079 


1080 


1081 


1082 


1083 


1084 


1085 


1086 


1087 


<t«x 


1088 


1089 


1090 


1091 


1092 


1093 


1094 


1095 


1096 


1097 


1098 


1099 


1100 


1101 


1102 


1103 


«5x 


1104 


1105 


1106 


1107 


1108 


1109 


1110 


1111 


1112 


1113 


1114 


1115 


1116 


1117 


1118 


1119 


it6x 


1120 


1121 


1122 


1123 


1124 


1125 


1126 


1127 


1128 


1129 


1130 


1131 


1132 


1133 


1134 


1135 


47x 


1136 


1137 


1138 


1139 


1140 


1141 


1142 


1143 


1144 


1145 


1146 


1147 


1148 


1149 


1150 


1151 


HBx 


1152 


1153 


1154 


1155 


1156 


1157 


1158 


1159 


1160 


1161 


1162 


1163 


1164 


1165 


1166 


1167 


USX 


1168 


1169 


1170 


1171 


1172 


1173 


1174 


1175 


1176 


1177 


1178 


1179 


1180 


1181 


1182 


1183 


nhx 


1184 


1185 


1186 


1187 


1188 


1189 


1190 


1191 


1192 


1193 


1194 


1195 


1196 


1197 


1198 


1199 


HBx 


1200 


1201 


1202 


1203 


1204 


1205 


1206 


1207 


1208 


1209 


1210 


1211 


1212 


1213 


1214 


1215 


<lCx 


1216 


1217 


1218 


1219 


1220 


1221 


1222 


1223 


1224 


1225 


1226 


1227 


1228 


1229 


1230 


1231 


«Dx 


1232 


1233 


1234 


1235 


1236 


1237 


1238 


1239 


1240 


1241 


1242 


1243 


1244 


1245 


1246 


1247 


HEX 


1248 


1249 


1250 


1251 


1252 


1253 


1254 


1255 


1256 


1257 


1258 


1259 


1260 


1261 


1262 


1263 


•Fx 


1264 


1265 


1266 


1267 


1268 


1269 


1270 


1271 


1272 


1273 


1274 


1275 


1276 


1277 


1278 


1279 


50x 


1280 


1281 


1282 


1283 


1284 


1285 


1286 


1287 


1288 


1289 


1290 


1291 


1292 


1293 


^294 


1295 


Six 


1296 


1297 


1298 


1299 


1300 


1301 


1302 


1303 


1304 


1305 


1306 


1307 


1308 


1309 


1310 


1311 


52x 


1312 


1313 


1314 


1315 


1316 


1317 


1318 


1319 


1320 


1321 


1322 


1323 


1324 


1325 


1326 


1327 


53x 


1328 


1329 


1330 


1331 


1332 


1333 


1334 


1335 


1336 


1337 


1338 


1339 


1340 


1341 


1342 


1343 


SOx 


1344 


1345 


1346 


1347 


1348 


1349 


1350 


1351 


1352 


1353 


1354 


1355 


1356 


1357 


1358 


1359 


55x 


1360 


1361 


1362 


1363 


1364 


1365 


1366 


1367 


1368 


1369 


1370 


1371 


137? 


1373 


1374 


1375 


56x 


1376 


1377 


1378 


1379 


1380 


1381 


1382 


1383 


1384 


1385 


1386 


1387 


1388 


1389 


1390 


1391 


S7x 


1392 


1393 


1394 


1395 


1396 


1397 


1398 


1399 


1400 


1401 


1402 


1403 


1404 


1405 


1406 


1407 


58x 


1408 


1409 


1410 


1411 


1412 


1413 


1414 


1415 


1416 


1417 


1418 


1419 


1420 


1421 


1422 


1423 


$9x 


1424 


1425 


1426 


1427 


1428 


1429 


1430 


1431 


1432 


1433 


1434 


1435 


1436 


1437 


1438 


1439 


SAX 


1440 


1441 


1442 


1443 


1444 


1445 


1446 


1447 


1448 


1449 


1450 


1451 


1452 


1453 


1454 


1455 


SBx 


1456 


1457 


14S8 


1459 


1460 


1461 


1462 


1463 


1464 


1465 


1466 


1467 


1468 


1469 


1470 


1471 


SCx 


1472 


1473 


1474 


1475 


1476 


1477 


1478 


1479 


1480 


1481 


1482 


1483 


1484 


1485 


1486 


1487 


SDx 


1488 


1489 


1490 


1491 


1492 


1493 


1494 


1495 


1496 


1497 


1498 


1499 


1500 


1501 


1502 


1503 


SBX 


1504 


1505 


1506 


1507 


1508 


1509 


1510 


1511 


1512 


1513 


1514 


1515 


1516 


1517 


1518 


1519 


SFX 


1520 


1S21 


1522 


1523 


1524 


1525 


1526 


1S27 


1528 


1529 


1530 


1531 


1532 


1533 


1534 


1535 


60x 


1536 


1537 


1538 


1539 


1540 


1541 


1542 


1543 


1544 


1545 


1546 


1547 


154 8 


1549 


1550 


1551 


61x 


1552 


1553 


1554 


1555 


1556 


1557 


1558 


1559 


1560 


1561 


1562 


1563 


1564 


1565 


1566 


1567 


62x 


1568 


1569 


1570 


1571 


1572 


1573 


1574 


1575 


1576 


1577 


1578 


1579 


1580 


1581 


1582 


1583 


63x 


1584 


1585 


1586 


1587 


1588 


1589 


1590 


1591 


1592 


1593 


1594 


1595 


1596 


1597 


1598 


1599 


6<tx 


1600 


1601 


1602 


1603 


1604 


1605 


1606 


1607 


1608 


1609 


1610 


1611 


1612 


1613 


1614 


1615 


65x 


1616 


1617 


1618 


1619 


1620 


1621 


1622 


1623 


1624 


1625 


1626 


1627 


1628 


1629 


1630 


1631 


66x 


1632 


1633 


1634 


1635 


1636 


1637 


1638 


1639 


1640 


1641 


1642 


1643 


1644 


1645 


1646 


1647 


67x 


1648 


1649 


1650 


1651 


1652 


1653 


1654 


1655 


1656 


1657 


1658 


165> 


1660 


1661 


1662 


1663 


68x 


1664 


1665 


1666 


1667 


1668 


1669 


1670 


1671 


1672 


1673 


1674 


1675 


1676 


1677 


1678 


1679 


69x 


1680 


1681 


1682 


1683 


1684 


1685 


1686 


1687 


1688 


1689 


1690 


1691 


1692 


1693 


1694 


1695 


6Ax 


1696 


1697 


1698 


1699 


1700 


1701 


1702 


1703 


1704 


1705 


1706 


1707 


1708 


1709 


1710 


1711 


6Bx 


1712 


1713 


1714 


1715 


1716 


1717 


1718 


1719 


1720 


1721 


1722 


1723 


1724 


1725 


1726 


1727 


6Cx 


1728 


1729 


1730 


1731 


1732 


1733 


1734 


1735 


1736 


1737 


1738 


1739 


1740 


1741 


1742 


1743 


60x 


1744 


1745 


1746 


1747 


1748 


1749 


1750 


1751 


1752 


1753 


1754 


1755 


1756 


1757 


1758 


1759 


6Ex 


1760 


1761 


1762 


1763 


1764 


1765 


1766 


1767 


1768 


1769 


1770 


1771 


1772 


1773 


1774 


1775 


6Fx 


1776 


1777 


1778 


1779 


1780 


1781 


1782 


1783 


1784 


1785 


1786 


1787 


1788 


1789 


1790 


1791 


70x 


1792 


1793 


1794 


1795 


179* 


1797 


1798 


1799 


1800 


1801 


1802 


1803 


1804 


1805 


1806 


1807 


71x 


1808 


1809 


1810 


1811 


1812 


1813 


1814 


1815 


1816 


1817 


1818 


1819 


1820 


1821 


1822 


1823 


72x 


1824 


1825 


1826 


1827 


1828 


1829 


1830 


1831 


1832 


1833 


1834 


1835 


1836 


1837 


1838 


1839 


73x 


1840 


1841 


1842 


1843 


1844 


1845 


1846 


1847 


1848 


1849 


1850 


1851 


1852 


1853 


1854 


1855 


7ax 


1856 


1857 


1858 


1859 


1860 


1861 


1862 


1863 


1864 


1865 


1866 


1867 


1868 


1869 


1870 


1871 


75x 


1872 


1873 


1874 


1875 


1876 


1877 


1878 


1879 


1880 


1881 


1882 


1883 


1884 


1885 


1886 


1887 


76x 


1888 


1889 


1890 


1891 


1892 


1893 


1894 


1895 


1896 


1897 


1898 


1899 


1900 


1901 


1902 


1903 


77x 


1904 


1905 


1906 


1907 


1908 


1909 


1910 


1911 


1912 


1913 


1914 


1915 


1916 


1917 


1918 


1919 


78x 


1920 


1921 


1922 


1923 


1924 


1925 


1926 


1927 


1928 


1929 


1930 


1931 


1932 


1933 


1934 


1935 


79x 


1936 


1937 


1938 


1939 


1940 


1941 


1942 


1943 


1944 


1945 


1946 


1947 


1948 


1949 


1950 


1951 


7Ax 


1952 


1953 


1954 


1955 


1956 


1957 


1958 


1959 


1960 


1961 


1962 


1963 


1964 


1965 


1966 


1967 


7Bx 


1968 


1969 


1970 


1971 


1972 


1973 


1974 


1975 


1976 


1977 


1978 


1979 


1980 


1981 


1982 


1983 


7Cx 


1984 


1985 


1986 


1987 


1988 


1989 


1990 


1991 


1992 


1993 


1994 


1995 


1996 


1997 


1998 


1999 


7Dx 


2000 


2001 


2002 


2003 


2004 


2005 


2006 


2007 


2008 


2009 


2010 


2011 


2012 


2013 


2014 


2015 


7EX 


2016 


2017 


2018 


2019 


2020 


2021 


2022 


2023 


2024 


2025 


2026 


2027 


2028 


2029 


2030 


2031 


7Fx 


2032 


2033 


2034 


2035 


2036 


2037 


2038 


2039 


2040 


2041 


2042 


2043 


2044 


2045 


2046 


2047 
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X - 


1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D 


E 


F 


SOx 
Six 
82x 
83x 


20«8 
2064 
2080 
2096 


2049 
2065 
2081 
2097 


2050 
2066 
2082 
2098 


2051 
2067 
2083 
2099 


2052 
2068 
2084 
2100 


2053 
2069 
2085 
2101 


2054 
2070 
2086 
2102 


2055 
2071 
2087 
2103 


2056 
2072 
2088 
2104 


2057 
2073 
2089 
2105 


2058 
2074 
2090 
2106 


2059 
207S 
2091 
2107 


2060 
2076 
2092 
2108 


2061 
2077 
2093 
2109 


2062 
2078 
2094 
2110 


2063 
2079 
2095 
2111 


8ilx 

esx 

66x 
87x 


2112 
2128 
2144 
2160 


2113 
2129 
2145 
2161 


2114 
2130 
2146 
2162 


2115 
2131 
2147 
2163 


2116 
2132 
2148 
2164 


2117 
2133 
2149 
2165 


2118 
2134 
2150 
2166 


2119 
2135 
2151 
2167 


2120 
2136 
2152 
2168 


2121 
2137 
2153 
2169 


2122 
2138 
2154 
2170 


2123 
2139 
2155 
2171 


2124 
2140 
2156 
2172 


2125 
2141 
2157 
2173 


2126 
2142 
2158 
2174 


2127 
2143 
2159 
2175 


88x 
89x 
8Xx 
SBx 


2176 
2192 
2208 
2224 


2177 
2193 
2209 
2225 


2178 
2194 
2210 
2226 


2179 
2195 
2211 
2227 


2180 
2196 
2212 
2228 


2181 
2197 
2213 
2229 


2182 
2198 
2214 
2230 


2183 
2199 
2215 
2231 


2184 
2200 
2216 
2232 


2185 
2201 
2217 
2233 


2186 
2202 
2218 
2234 


2187 
2203 
2219 
2235 


2188 
2204 
2220 
2236 


2189 
2205 
2221 
2237 


2190 
2206 
2222 
2238 


2191 
2207 
2223 
2239 


8Cx 
8Dx 
8Ex 
8Fx 


2240 
2256 
2272 
2288 


224.1 
2257 
2273 
2289 


2242 
2258 
2274 
2290 


2243 
2259 
2275 
2291 


2244 
2260 
2276 
2292 


2245 
2261 
2277 
2293 


2246 
2262 
2278 
2294 


2247 
2263 
2279 
2295 


2248 
2264 
2280 
2296 


2249 
2265 
2281 
2297 


2250 
2266 
2282 
2298 


2251 
2267 
2283 
2299 


2252 
2268 
2284 
2300 


2253 
2269 
2285 
2301 


2254 
2270 
2286 
2302 


2255 
2271 
2287 
2303 


90x 
91x 
92x 
93x 


2304 
2320 
2336 
2352 


2305 
2321 
2337 
2353 


2306 
2322 
2338 
2354 


2307 
2323 
2339 
2355 


2308 
2324 
2340 
2356 


2309 
2325 
2341 
2357 


2310 
2326 
2342 
2358 


2311 
2327 
2343 
2359 


2312 
2328 
2344 
2360 


2313 
2329 
2345 
2361 


2314 
2330 
2346 
2362 


2315 
2331 
2347 
2363 


2316 
2332 
2348 
2364 


2317 
2333 
2349 
2365 


2318 
2334 
2350 
2366 


2319 
2335 
2351 
2367 


9«x 
95x 

9«x 
97x 


2368 
238« 
2«00 
21116 


2369 
2385 
2401 
2417 


2370 
2386 
2402 
2418 


2371 
2387 
2403 
2419 


2372 
2388 
2404 
2420 


2373 
2389 
2405 
2421 


2374 
2390 
2406 
2422 


2375 
2391 
2407 
2423 


2376 
2392 

2408 
2424 


2377 
2393 
2409 
24215 


2378 
2394 
2410 
2426 


2379 
2395 
2411 
2427 


2380 
2396 
2412 
2428 


2381 
2397 
2413 
2429 


2382 
2398 
2414 
2430 


2383 
2399 
2415 
2431 


98x 

99x 
9Ax 
ttx 


2432 
2««8 

2«6il 
2480 


2433 
2449 
2465 
2481 


2434 

2450 
2466 
2482 


2435 
2451 
2467 
24 83 


2436 
2452 
2468 
2484 


2437 
2453 
2469 
2485 


2438 
2454 
2470 
2486 


2439 
2455 
2471 
2487 


2440 
2456 
2472 
2488 


2441 
2457 
2473 
2489 


2442 
2458 
2474 
2490 


2443 
2459 
2475 
2491 


2444 
2460 
2476 
2492 


2445 
2461 
2477 
2493 


2446 
2462 
2478 
2494 


2447 
2463 
2479 
2495 


9Cx 
90x 
fix 

9rx 


2496 
2512 
2528 
2544 


2497 
2513 
2529 
2545 


2496 
2514 
2530 
2546 


24 99 
2515 
2531 
2547 


2500 
2516 
2532 
2548 


2501 
2517 
2533 
2549 


2502 
2518 
2534 
2550 


2503 
2519 
2535 
2551 


2504 
2520 
2536 
2552 


2505 
2521 
2537 
2553 


2506 
2522 
2538 
2554 


2507 
2523 
2539 
2555 


2508 
2524 
2540 
2556 


2509 
2525 
2541 
2557 


2510 
2526 
2542 
2558 


2511 
2527 
2543 
2559 


AOx 
Alx 
A2x 
A3x 


2560 
2576 
2592 
2608 


2561 
2577 
2593 
2609 


2562 
2578 
2594 
2610 


2563 
2579 
2595 
2611 


2564 
2580 
2596 
2612 


2565 
2581 
2597 
2613 


2566 
2582 
2598 
2614 


2567 
2583 
2599 
2615 


2568 
2584 
2600 
2616 


2569 
2585 
2601 
2617 


2570 
2586 
2602 
2618 


2571 
2587 
2603 
2619 


2572 
2588 
2604 
2620 


2573 
2589 
2605 
2621 


2574 
2590 
2606 
2622 


2575 
2591 
2607 
2623 


AUx 
A5x 
A6x 
A7x 


2624 
2640 
2656 
2672 


2625 
2641 
2657 
2673 


2626 
2642 
2658 
2674 


2627 
2643 
2659 
2675 


2628 
2644 
2660 
2676 


2629 
2645 
2661 
2677 


2630 
2646 
2662 
2678 


2631 
2647 
2663 
2679 


2632 
2648 
2664 
2680 


2633 
2649 
2665 
2681 


2634 
2650 
2666 
2682 


2635 
2651 
2667 
2683 


2636 
2652 
2668 
2684 


2637 
2653 
2669 
2685 


2638 
2654 
2670 
2686 


2639 
2655 
2671 
2687 


A8x 
A9x 
AAx 
ABx 


2688 
2704 
2720 
2736 


2689 
2705 
2721 
2737 


2690 
2706 
2722 
2738 


2691 
2707 
2723 
2739 


2692 
2708 
2724 
2740 


2693 
2709 
2725 
2741 


2694 
2710 
2726 
2742 


2695 
2711 
2727 
2743 


2696 
2712 
2728 
2744 


2697 
2713 
2729 
2745 


2698 
2714 
2730 
2746 


2699 
2715 
2731 
2747 


2700 
2716 
2732 
2748 


2701 
2717 
2733 
2749 


2702 
2718 
2734 
2750 


2703 
2719 
2735 
2751 


ACx 
AOX 
ASx 
AFX 


2752 
2768 
2784 
2800 


2753 
2769 
2785 
2801 


2754 
2770 
2786 
2802 


2755 
2771 
27*7 
2803 


2756 
2772 
2788 
2804 


2757 
2773 
2789 
2805 


2758 
2774 
2790 
2806 


2759 
2775 
2791 
2807 


2760 
2776 
2792 
2808 


2761 
2777 
2793 
2809 


2762 
2778 
2794 
2810 


2763 
2779 
2795 
2811 


276" 
2780 
2796 
2812 


2765 
2781 
2797 
2813 


2766 
2782 
2798 
2814 


2767 
2783 
2799 
2815 


BOX 
Six 
B2x 
B3x 


2816 
2832 
2848 
2864 


28l7 
2833 
2849 
2865 


2818 
2834 
2850 
2866 


2819 
2835 
2851 
2867 


2820 
2836 
2852 
2868 


2821 
2837 
2853 
2869 


2822 
2838 
2854 
2870 


2823 
2839 
2855 
2871 


2824 
2840 
2856 
2872 


2825 
2841 
2857 
2873 


2826 
2842 
2858 
2874 


2827 
2843 
2859 
2875 


2828 
2844 
2860 
2876 


2829 
2845 
2861 
2877 


2830 
2846 
2862 
2878 


2831 
2847 
2863 
2679 


B«X 
BSx 

B6x 
B7x 


2880 
2896 
2912 
2928 


2881 
2897 
2913 
2929 


2882 
2898 
2914 
2930 


2883 
2899 
2915 
2931 


2884 
2900 
2916 
2932 


2885 
2901 
2917 
2933 


2886 
2902 
2918 
2934 


2887 
2903 
2919 
2935 


2888 
2904 
2920 
2936 


2889 
2905 
2921 
2937 


2890 
2906 
2922 
2938 


2891 
2907 
2923 
2939 


2892 
2908 
2924 
2940 


2893 
2909 
2925 
2941 


2894 
2910 
2926 
2942 


2895 
2911 
2927 
2943 


BSx 

B9x 
BAx 
BBx 


2944 
2960 
2976 
2992 


2945 
2961 
2977 
2993 


2946 
2962 
2978 
2994 


2947 
2963 
2979 
2995 


2948 
2964 
2980 
2996 


2949 
2965 
2981 
2997 


2950 
2966 
2982 
2998 


2951 
2967 
2983 
2999 


2952 
2968 
2984 
3000 


2953 
2969 
2985 
3001 


2954 
2970 
2986 
3002 


2955 
2971 
2987 
3003 


2956 
2972 
2988 
3004 


2957 
2973 
2989 
3005 


2958 
2974 
2990 
3006 


2959 
2975 
2991 
3007 


BCx 
BDx 
BBx 


3008 
3024 
3040 
3056 


3009 
3025 
3041 
3057 


3010 
3026 
3042 
3058 


3011 
3027 
3043 
3059 


3012 
3028 
3044 
3060 


3013 
3029 
3045 
3061 


3014 
3030 
3046 
3062 


3015 
3031 
3047 
3063 


3016 
3032 
3048 
3064 


3017 
3033 
3049 
3065 


3018 
3034 
3050 
3066 


3019 
3035 
3051 
3067 


3020 
3036 
3052 
3068 


3021 
3037 
3053 
3069 


302.. 
3038 
3054 
3070 


3023 
3039 
3055 
3071 
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X - 


1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D 


£ 


F 


COx 
C1x 
C2x 
C3x 


3072 
3088 
3104 
3120 


3073 
3089 
3105 
3121 


3074 
3090 
3106 
3122 


3075 
3091 
3107 
3123 


3076 
3092 
3108 
3124 


3077 
3093 
3109 
3125 


3078 
3094 
3110 
3126 


3079 
3095 
3111 
3127 


3080 
3096 
3112 
3128 


3081 
3097 
3113 
3129 


3082 
3098 
3114 
3130 


3083 
3099 
3115 
3131 


3084 
3100 
3116 
3132 


3101 
3117 
3133 


3086 
3102 
3118 
3134 


3087 
3103 
3119 
3135 


C<tx 
C5x 
C6x 
C7y 


3136 
1152 
3168 
3184 


3137 
3153 
3169 
3185 


3138 
3154 
3170 
3186 


3139 
3155 
3171 
3187 


3140 
3156 
3172 
3188 


3141 
3157 
3173 
3189 


3142 
3158 
3174 
3190 


3143 
3159 
3175 
3191 


3144 
3160 
3176 
3192 


3145 
3161 
3177 
3193 


3146 
3162 
3178 
3194 


3147 
3163 
3179 
3195 


3148 
3164 
3160 
3196 


3149 
3165 
3181 
3197 


3150 
3166 
3182 
3198 


3151 
3167 
3183 
3199 


C8x 
C9x 
CAx 
CBx 


3200 
3216 
3232 
3248 


3201 
3217 
3233 
3249 


3202 
3218 
3234 
3250 


3203 
3219 
3235 
3251 


3204 
3220 
3236 
3252 


3205 
3221 
3237 
3253 


3206 
3222 
3238 
3254 


3207 
3223 
3239 
3255 


3208 
3224 
3240 
3256 


3209 
3225 
3241 
3257 


3210 
3226 
3242 
3258 


3211 
3227 
3243 
3259 


3212 
3228 
3244 
3260 


3213 
3229 
3245 
3261 


3214 
3230 
3246 
3262 


3215 
3231 
3247 
3263 


CCx 

CDX 
CEx 
CFx 


3264 
3280 
3296 
3312 


3265 
3281 
3297 
3313 


3266 
3282 
3298 
3314 


3267 
32 83 
3299 
3315 


3268 
3284 
3300 
3316 


3269 
3285 
3301 
3317 


3270 
3286 
3302 
3318 


3271 
3287 
3303 
3319 


3272 
3288 
3304 
3320 


3273 
3289 
3305 
3321 


3274 
3290 
3306 
3322 


3275 
3291 
3307 
3323 


3276 
3292 
3308 
3324 


3277 
3293 
3309 
3325 


3278 
3294 
3310 
3326 


3279 
3295 
3311 
3327 


DOx 
Dix 
D2x 
D3x 


3328 
3344 
3360 
3376 


3329 
3345 
3361 
3377 


3330 
3346 
3362 
3378 


3331 
3347 
3363 
3379 


3332 
3348 
3364 
3380 


3333 
3349 
3365 
3381 


3334 
3350 
3366 
3382 


3335 
3351 
3367 
3383 


3336 
3352 
3368 
3384 


3337 
3353 
3369 
3385 


3338 
3354 
3370 
3386 


3339 
3355 
3371 
3387 


3340 
3356 
3372 
3388 


3341 
3357 
3373 
3389 


3342 
3358 
3374 
3390 


3343 
3359 
3375 
3391 


D<lx 
D5x 
D6x 
D7x 


3392 
3408 
3424 
3440 


3393 
3409 
3425 
3441 


3394 
3410 
3426 
3442 


3395 
3411 
3427 
3443 


3396 
3412 
3428 
3444 


3397 
3413 
3429 
3445 


3398 
3414 
3430 
3446 


3399 
3415 
3431 
3447 


3400 
3416 
3432 
3448 


3401 
3417 
3433 
3449 


3402 
3418 
3434 
3450 


3403 
3419 
3435 
3451 


3404 
3420 
3436 
3452 


3405 
3421 
3437 
3453 


3406 
3422 
3438 
3454 


3407 
3423 
3439 
3455 


D8x 
D9x 
DAx 
DBx 


3456 
3472 
3488 
3504 


3457 
3473 
3489 
3505 


3458 
3474 
3490 
3506 


34 59 
3475 
3491 
3507 


3460 
3476 
3492 
3508 


3461 
3477 
3493 
3509 


3462 
3478 
3494 
3510 


3463 
3479 
3495 
3511 


3464 
3480 
3496 
3512 


3465 
3481 
3497 
3513 


3466 
3482 
3498 
3514 


3467 
3483 
3499 
3515 


3468 
3484 
3500 
3516 


3469 
3485 
3501 
3517 


3470 
3486 
3502 
3518 


3471 
3487 
3503 
3519 


DCx 
DDx 
DEX 
DPx 


3520 
3536 
3552 
3568 


3521 
3537 
3553 
3569 


3522 
3538 
3554 
3570 


3523 
3539 
3555 
3571 


3524 
3540 
3556 
3572 


3525 
3541 
3557 
3573 


3526 
3542 
3558 
3574 


3527 
3543 
3559 
3575 


3528 
3544 
3560 
3576 


3529 
3545 
3561 
3577 


3530 
3546 
3562 
3578 


3531 
3547 
3563 
3579 


3532 
3548 
3564 
3580 


3533 
3549 
3565 
3581 


3534 
3550 
3566 
3582 


3535 
3551 
3567 
3583 


EOx 
Elx 
E2x 
E3x 


}584 
3600 
3616 
3632 


3585 
3601 
3617 
3633 


3586 
3602 
3618 
3634 


3587 
3603 
3619 
3635 


3588 
3604 
3620 
3636 


3589 
3605 
3621 
3637 


3590 
3606 
3622 
3638 


3591 
3607 
3623 
3639 


3592 
3608 
3624 
3640 


3593 
3609 
3625 
3641 


3594 
3610 
3626 
3642 


3595 
3611 
3627 
3643 


3596 
3612 
3628 
3644 


3597 
3613 
3629 
3645 


3598 
3614 
3630 
3646 


3599 
3615 
3631 
3647 


E<tX 
E5x 
E6x 
E7x 


3648 
3664 
3680 
3696 


3649 
3665 
3681 
1697 


3650 
3666 
3682 
3698 


3651 
3667 
3683 
3699 


3652 
3668 
3684 
3700 


3653 
3669 
3685 
3701 


3654 
3670 
3686 
3702 


3655 
3671 
3687 
3703 


3656 
3672 
3688 
3704 


3657 
3673 
3689 
3705 


3658 
3674 
3690 
3706 


3659 
3675 
3691 
3707 


3660 
3676 
3692 
3708 


3661 
3677 
3693 
370<» 


3662 
3678 
3694 
3710 


3663 
3679 
3695 
3711 


E8x 
E9x 
EAx 
EBx 


3712 
3728 
3744 
3760 


3713 
3729 
3745 
3761 


3714 
3730 
3746 
3762 


3715 
3731 
3747 
3763 


3716 
3732 
3748 
3764 


3717 
3733 
3749 
3765 


3718 
3734 
3750 
3766 


3719 
3735 
3751 
3767 


3720 
3736 
3752 
3768 


3721 
3737 
3753 
3769 


3722 
3738 
3754 
3770 


3723 
3739 
3755 
3771 


3724 
3740 
3756 
3772 


3725 
3741 
3757 
3773 


372b 
3742 
3758 
3774 


3727 
3743 
3759 
3775 


ECx 
EOx 
EEX 
EPx 


3776 
3792 
3808 
3824 


3777 
3793 
3809 
3825 


3778 
3794 
3810 
3826 


3779 
37 95 
3811 
3827 


3780 
3796 
3812 
3828 


3781 
3797 
3813 
3829 


3782 
3798 
3814 
3830 


3783 
3799 
3815 
3831 


3784 
3800 
3816 
3832 


3785 
3801 
3817 
3833 


3786 
3802 
3818 
3834 


3787 
3803 
3819 
3835 


3788 
3804 
3820 
3836 


3789 
3805 
3821 
3837 


3790 
3806 
3822 
3838 


3791 
3«07 
3823 
3839 


FOx 
Fix 
F2x 
F3x 


3840 
3856 
3872 
3888 


3841 
3857 
3873 
3889 


3842 
3858 
3874 
3890 


3843 
3859 
3875 
3891 


3844 
3860 
3876 
3892 


3845 
3861 
3877 
3893 


3846 
3862 
3878 
3894 


3847 
3863 
3879 
3895 


3848 
3864 
3880 
3896 


3849 
3865 
3881 
3697 


3850 
3866 
3882 
3898 


3851 
3867 
3883 
3899 


3352 
3868 
3884 
3900 


3853 
3869 
3885 
3901 


3854 
3870 
38B6 
3902 


3855 
3b71 
3887 
3903 


Fix 
F5x 
F6x 
FTx 


3904 
3920 
3936 
3952 


3905 
3921 
3937 
3953 


3906 
3922 
3938 
3954 


3907 
3923 
3939 
3955 


3908 
3924 
3940 
3956 


3909 
3925 
3941 
3957 


3910 
3926 
3942 
3958 


3911 
3^27 
3943 
3959 


3912 
3928 
3944 
3960 


3913 
3929 
3945 
3961 


3914 
3930 
3946 
3962 


3915 
3931 
3947 
3963 


3916 
3932 
3948 
3964 


3917 
3933 
3949 
3965 


3918 
3934 
3950 
3966 


3919 
3935 
3951 
3967 


F8x 
F9x 
FAX 
FBx 


3968 
3984 
4000 
4016 


3969 
3985 
4001 
4017 


3970 
3986 
4002 
4018 


3971 
3987 
4003 
4019 


3972 
3988 
4004 
4020 


3973 
3989 
4005 
4021 


3974 
3990 
4006 
4022 


3975 
3991 
4007 
4023 


3976 
3992 
4008 
4024 


3977 
3993 
4009 
4025 


3978 
3994 
4010 
4026 


3979 
3995 
4011 
4027 


3980 
3996 
4012 
4028 


3981 
3997 
4013 
4029 


3982 
3998 
4014 
4030 


3983 
3999 
4015 
4031 


FCx 
FDX 
FEx 
FFx 


4032 
4048 
4064 
4080 


4033 
4049 
4065 
4081 


4034 
4050 
4066 
4082 


4035 
4051 
4067 
4083 


4036 
4052 
4068 
4084 


4037 
4053 
4069 
4085 


4038 
4054 
4070 
4086 


4039 
4055 
4071 
4087 


4040 
4056 
4072 
4088 


4041 
4057 
4073 
4089 


4042 
4058 
4074 
4090 


4043 
4059 
4075 
4091 


4044 
4060 
4076 
4092 


4045 
4061 
4077 
4093 


4046 
4062 
4078 
4094 


4047 
4063 
4079 
4095 
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APPENDIX C: MACHINE-INSTRUCTION FORMAT 



BASIC MACHINE FORMAT 



ASSEMBLER OPERAND 
FIELD FORMAT 



APPLICABLE INSTRUCTIONS 



RR 



RX 



8 

Operation 

Code 


4 
Rl 


4 
R2 



8 

Operation 

Code 


4 
Ml 


4 
R2 



8 

Operation 

Code 


4 
Rl 





R1,R2 



M1,R2 



Rl 



8 

Operation 

Code 


8 

I 



(See Notes 1,6,8, 
and 9) 



8 


4 


4 


4 


12 


Operation 










Code 


Rl 


X2 


B2 


D2 



8 

Operation 

Code 


4 
Ml 


4 
X2 


4 
B2 


12 
D2 



R1,D2(X2,B2) 
R1,D2(,B2) 
R1,S2(X2) 
R1,S2 



M1,D2(X2,B2) 
M1,D2(,B2) 
M1,S2(X2) 
M1,S2 

(See Notes 1,6,8, 
and 9) 



All RR instructions 
except BCR,SPM, 
and SVC 



BCR 



SPM 



SVC 



All RX instructions 
except BC 



BC 



RS 



8 


4 


4 


4 


12 


Operation 










Code 


Rl 


R3 


B2 


D2 



8 


4 


4 


4 


12 


Operation 










Code 


Rl 




B2 


D2 



8 


4 


4 


4 


12 


Operation 
Code 


Rl 


M3 • 


B2 


D2 



R1,R3,D2(B2) 
R1,R3,S2 



R1,D2(B2) 
R1,S2 



R1,M3,D2(B2) 
R1,M3,S2 

(See Notes 1-3,7, 
8, and 9) 



BXH , BXLE , LM , STM , LCL , STCL 



All shift instructions 



ICM,STCM,CLM 
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BASIC MACHINE FORMAT 



ASSEMBLER OPERAND 
FIELD FORMAT 



APPLICABLE INSTRUCTIONS 



8 

Operation 
Code 


8 
12 


4 
Bl 


12 
Dl 



SI 



8 

Operation 

Code 




4 
Bl 


12 

Dl 



Dl(Bl) ,12 
SI, 12 



Dl(Bl) 

SI (See Notes 2,3,6, 
7,8 and 10) 



All SI instructions 
except those listed 
for other SI formats 



LPSW , SSM , TIO , TCH , TS 



16 


4 


12 


Two-byte 






Operation 






Code 


Bl 


Dl 



Dl(Bl) 
SI 



(See Notes 2, 
3, and 7) 



SCK,STCK,STIPD,SIOF, STIDC, 

SIO,HIO,HDV 

SCKC , STCKC , SPT , STPT , PTLB , 

RRB 



8 


4 


4 


4 


12 


4 


12 


Operation 














Code 


LI 


L2 


Bl 


Dl 


B2 


D2 



SS 



8 


8 


4 


12 


4 


12 


Operation 












Code 


L 


Bl 


Dl 


B2 


D2 



Operation 
Code 



12 
Dl 



4 
B2 



D1(L1,B1) ,D2(L2,B2) 
Sl(Ll) ,S2(L2) 



D1(L,B1) ,D2(B2; 
S1(L) ,S2 



D1(L1,B1) ,D2(B2) ,13 
Sl(Ll) ,S2, 13 
S1,S2,I3 

(See Notes 2,3,5,6, 
7 and 10) 



PACK,UNPK,MVO,AP, 
CP,DP,MP,SP,ZAP 



NC , OC , XC ,CLC ,MVC ,MVN, 
MVZ , TR , TRT , ED , EDMK 



SRP 



Notes for Appendix C ; 

1. Rl, R2, and R3 are absolute expressions that specify general or floating-point reg- 
isters. The general register numbers are through 15; floating-point register num- 
bers are 0, 2, 4, and 6. 

2. Dl and D2 are absolute expressions that specify displacements. A value of - 4095 
may be specified. 

3. Bl and B2 are absolute expressions that specify base registers. Register numbers are 
- 15. 

4. X2 is an absolute expression that specifies an index register. Register numbers are 
- 15. 



9. 

10, 



L, LI, and L2 are absolute expressions that specify field lengths. An L expression 
can specify a value of 1 - 256. Ll and L2 expressions can specify a value of 1 - 16. 
In all cases, the assembled value will be one less than the specified value. 

I, 12, and 13 are absolute expressions that provide immediate data. The value of I 
and 12 may be - 255. The value of 13 may be - 9 . 

SI and S2 are absolute or relocatable expressions that specify an address. 

RR, RS, and SI instruction fields that are blank under BASIC MACHINE FORMAT are not 
examined during instruction execution. The fields are not written in the symbolic 
operand, but are assembled as binary zeros. 

Ml and M3 specify a 4-bit mask. 

In IBM System/370 the SIO, HIO, HDV and SIOF operation codes occupy one byte and the 
low order bit of the second byte. In all other systems the HIO and SIO operation 
codes occupy only the first byte of the instruction. 
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Appendix D. Machine Instruction Mnemonic Operation Codes 



This appendix contains two tables of the mnemonic operation codes for all machine 
Instructions that can be represented In assembler language, Including extended 
mnemonic operation codes. 

The first table Is in alphabetic order by Instruction. The second table Is In numeric 
order by operation code. 

In the first table Is Indicated: both the mnemonic and machine operation codes, 
explicit and Implicit operand formats, program Interruptions possible, and condition 
code set. 

The column headings In the first table and the Information each column provides follow: 

Instruction : This column contains the name of the instruction associated with the 
mnemonic operation code. 

Mnemonic Operation Code : This column contains the mnemonic operation code for the machine 
instruction. This is written in the operation field when coding the instruction. 

Machine Operation Code ; This column contains the hexadecimal equivalent of the actual 
machine operation code. The operation code will appear in this form in roost storage 
dumps and when displayed on the system control panel. For extended mnemonics, this 
column also contains the mnemonic code of the instruction from which the extended 
mnemonic is derived. 

Operand Format : This column shows the symbolic format of the operand field in both 
explicit and implicit form. For both forms, R1, R2, eind R3 indicate general registers 
in operands one, two, and three respectively. X2 indicates a general register used as 
an index register in the second operand. Instructions which require an index register 
(X2) but are not to be indexed are shown with a replacing X2. L, LI, and L2 indicate 
lengths for either operand, operand one, or operand two respectively. Ml and M3 indicate 
a 4-bit mask in operand one and three, respectively. I, 12, and 13 indicate immediate 
data eight bits long (I and 12) or four bits long (13) . 

For the explicit format, D1 and D2 indicate a displacement and B1 and B2 indicate a 
base register for operands one and two. 

For the implicit format, Dl, B1, and D2, B2 are replaced by SI and S2 which indicate 
a storage address in operands one and two. 

Type of Instruction : This column gives the basic machine format of the instruction (RR, 
RX, SI, or SS) . If an instruction is included in a special feature or is an extended 
mnemonic, this is also indicated. 

Program Interruptions Possibl e; This column indicates the possible program interruptions 
for this instruction. The abbreviations used are; A - Addressing, S - Specification, 
Ov - Overflow, P - Protection, Op - Operation (if feature is not installed) , and Other 
- other interruptions which are listed. The type of overflow is indicated by; D - 
Decimal, E - Exponent, or F - Fixed Point. 

Condition Code Set ; The condition codes set as a result of this instruction are indicated 
in this column. (See legend following the table.) 
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Instruction 


Mnemonic 
Operation 


Machine 
Operation 


Operand Format 




Code 


Code 


Explicit 


Implicit 


Add 
Add 


A 
AR 


5A 
lA 


Rl,D2(X2,B2)or Rl , D2(,B2) 
R1,R2 


Rl,S2(X2)or R1,S2 


Add Decimal 
Add Halfword 
Add Logical 


AP 
AH 
AL 


FA 
4A 
5E 


D1(L1,B1),D2(L2,B2) 
RI,D2{X2,B2)or R1,D2(,B2) 
Rl,D2(X2,B2)or R1,D2(,B2) 


Sl(Ll),S2(L2)or S1,S2 
Rl,S2(X2)or Rl , S2 
Rl,S2(X2)or R1,S2 


Add Logical 


ALR 


IE 


R1,R2 




Add Normalized, Extended 


AXR 


36 


R1,R2 




Add Normalized, Long 
Add Normalized, Long 


AD 
ADR 


6A 
2A 


Rl,D2(X2,B2)orRl,D2(,B2) 
R1,R2 


Rl,S2(X2)or R1,S2 


Add Normalized, Short 
Add Normalized, Short 


AE 
AER 


7A 
3A 


Rl,D2(X2,B2)or R1,D2(,B2) 
R1,R2 


Rl,S2(X2)orRl,S2 


Add Unnormalized,Long 
Add Unnormalized, Long 


AW 
AWR 


6E 
2E 


Rl,D2(X2,B2)orRl,D2(,B2) 
R1,R2 


Rl,S2(X2)orRl,S2 


Add Unnormalized, Short 
Add Unnormalized, Short 


AU 
AUR 


7E 
3E 


Rl,D2(X2,B2)orRl,D2(,B2) 
R1,R2 


Rl,S2(X2)or R1,S2 


And Logical 


N 


54 


Rl,D2(X2,B2)or R1,D2(,B2) 


Rl,S2(X2)or Rl , S2 


And Logical 
And Logical 


NC 
NR 


D4 
14 


D1(L,B1),D2(B2) 
R1,R2 


S1(L),S2 or S1,S2 


And Logical immediate 


Nl 


94 


D1(B1),I2 


SI, 12 


Branch and Link 
Branch and Link 


BAL 
BALR 


45 
05 


Rl,D2(X2,B2)or R1,D2(,B2) 
R1,R2 


Rl,S2(X2)or R1,S2 


Branch on Condition 
Branch on Condition 
Branch on Count 
Branch on Count 
Branch on Equal 


BC 

BCR 

BCT 

BCTR 

BE 


Al 
07 
46 
06 
47 (BC 8) 


Ml,D2(X2,B2)orMl,D2(,B2) 

M1,R2 

Rl,D2(X2,B2)or R1,D2(,B2) 

R1,R2 

D2(X2,B2)orD2(,B2) 


Ml,S2(X2)orMl,S2 
Rl,S2(X2)or R1,S2 
S2(X2) or S2 


Branch on High 


BH 


47 (BC 2) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch in Index High 

Branch on Index Low or Equal 

Branch on Low 


BXH 
BXLE 
BL 


86 
87 
47(BC 4) 


R1,R3,D2(B2) 
R1,R3,D2(B2) 
D2(X2,B2)orD2(,B2) 


R1,R3,S2 
R1,R3,S2 
S2(X2) or S2 


Branch if Mixed 


BM 


47 (BC 4) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch on Minus 


BM 


47 (BC 4) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch on Not Equal 


BNE 


47(BC 7) 


D2(X2,B2)orD2(,B2) 


S2(X2) or 52 


Branch on Not High 


BNH 


47 (BC 13) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch on Not Low 


BNL 


47 (BC 11) 


D2(X2,B2)or D2(,B2) 


S2(X2) or S2 


Branch on Not Minus 


BNM 


47 (BC 11) 


D2(X2,B2)or D2(,B2) 


S2(X2) or S2 


Branch on Not Ones 


BNO 


47 (BC 14) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch on Not Plus 


BNP 


47 (BC 13) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch on Not Zeros 


BNZ 


47 (BC 7) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch if Ones 


BO 


47 (BC 1) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch on Overflow 


BO 


47(BC 1) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch on Plus 


BP 


47(BC 2) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch if Zeros 


BZ 


47 (BC 8) 


D2(X2,B2)or D2(,B2) 


S2(X2) or 32 


Branch on Zero 


BZ 


47 (BC 8) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch Unconditional 
Branch Unconditional 


B 
BR 


47(BC 15) 
07 (BCR 15) 


D2(X2,B2)orD2(,B2) 
R2 


S2(X2) or S2 


Compare Algebraic 


C 


59 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2 or Rl , S2 


Compare Algebraic 
Compare Decimal 
Compare Halfword 
Compare Logical 


CR 
CP 
CH 
CL 


19 
F9 
49 
55 


RI,R2 

D1(L1,B1),D2(L2,B2) 
Rl,D2(X2,B2)orRl,D2(,B2) 
Rl,D2(X2,B2)or R1,D2(,B2) 


Sl(Ll),S2(L2)or SI , S2 
Rl,S2(X2)or R1,S2 
Rl,S2(X2)or R1,S2 


Compare Logical 


CLC 


D5 


D1(L,B1),D2(B2) 


S1(L),S2 or S1,S2 
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Instruction 


Type of 
Instruction 


Program Interruption 
Possible 


Condition Code Set 


A 


s 


Ov 


p 


Op 


Other 


00 


01 


10 


11 


Add 

Add 

Add Decimal 

Add Halfword 

Add Logical 


RX 

RR 

SS, Decimal 

RX 

RX 


X 

X 
X 


X 
X 


F 
F 
D 

F 


X 


X 


Data 


Sum=0 
Sum=0 
Sum=0 
Sum=0 
Sum==0(S) 


Sum<0 
Sum<0 
Sum<0 
Sum<0 
Sum 0® 


Sum>0 
Sum>0 
Sum>0 
Sum>0 
Sum= 0© 


Overflow 
Overflow 
Overflow 
Overflow 
Sum 0® 


Add Logical 


RR 














Sum=0 (B) 


Sum= 0@ 


Sum= 0© 


Sum 0© 


Add Normalized, Extended 


RR,Floating Pt. 




X 


E 




X 


B,C 


R 




M 




Add Normalized, Long 
Add Normalized, Long 
Add Normalized, Short 
Add Normalized, Short 


RX, Floating Pt. 
RR, Floating Pt. 
RX, Floating Pt. 
RR, Floating Pt. 


X 
X 


X 


E 

E 
E 
E 




X 
X 
X 
X 


B,C 
B,C 
B,C 
B,C 


R 
R 
R 
R 




M 
M 
M 
M 




Add Unnormalized,Long 
Add Unnormolized, Long 
Add Urnormolized, Short 
Add Unnormolized, Short 
And Logical 


RX, Floating Pt . 
RR, Floating Pt. 
RX, Floating Pt. 
RR, Floating Pt. 
RX 


X 
X 
X 


X 

X 
X 
X 


E 
E 
E 
E 




X 
X 
X 
X 


C 
C 
C 
C 


R 
R 
R 
R 
J 


K 


M 
M 
M 
M 




And Logical 
And Logical 
And Logical Immediate 


SS 

RR 
SI 


X 
X 






X 
X 






J 

J 
J 


K 
K 
K 






Branch and Link 
Branch and Link 


RX 
RR 














N 
N 


N 
N 


N 
N 


N 
N 


Branch on Condition 
Branch on Condition 
Branch on Count 
Branch on Count 
Branch on Equal 


RX 
RR 
RX 
RR 
RX, Ext. Mnemonic 














N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


Branch on High 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Index High 
Branch on Index Low or Equal 
Branch on Low 


RS 
RS 
RX, Ext. Mnemonic 














N 
N 
N 


N 
N 
N 


N 
N 
N 


N 
N 
N 


Branch if Mixed 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Minus 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Not Equal 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Not High 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Not Low 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Not Minus 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Not Ones 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Not Plus 


RX, Ext.Mnenr)onic 














N 


N 


N 


N 


Branch on Not Zeros 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch if Ones 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Overflow 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Plus 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch if Zeros 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Zero 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch Unconditional 
Branch Unconditional 


RX, Ext. Mnemonic 
RR, Ext. Mnemonic 














N 
N 


N 
N 


N 
N 


N 
N 


Compare Algebraic 
Compare Algebraic 
Compare Decimal 
Compare Halfword 
Compare Logical 


RX 

RR 

SS, Decimal 

RX 

RX 


X 

X 
X 
X 


X 

X 
X 






X 


Data 


Z 
Z 

z 
z 
z 


AA 
AA 
AA 
AA 
AA 


BB 
BB 
BB 
BB 
BB 




Compare Logical 


SS 


X 


X 










z 


AA 


BB 
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Instruction 


Mnemonic 
Operation 


Machine 
Operation 


Operand Format 






Code 


Code 


Explicit 


Implicit 


Compare Logical 


CLR -^ 


15 


R1,R2 






Compare Logical 


CLM 


BD 


R1,M3,D2{B2) 


R1,M3,S2 




Characters under 












Mask 












Compare Logical Immediate 


CLI 


95 


D1(B1),I2 


SI, 12 




Compare Logical Long 


CLCL 


OF 


R1,R2 






Compare, Long 


CD 


69 


Rl,D2(X2,B2)or R1,D2(,B2) 


Rl,S2(X2)or 


R1,S2 


Compare, Long 


CDR 


29 


R1,R2 






Compare, Short 


CE 


79 


Rl,D2(X2,B2)or R1,D2(,B2) 


Rl,S2(X2)or 


R1,S2 


Compare, Short 


CER 


39 


R1,R2 






Convert to Binary 


CVB 


4F 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)or 


R1,S2 


Convert to Decimal 


CVD 


4E 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)or 


R1,S2 


Divide 


D 


5D 


Rl,D2(X2,B2)or R1,D2(,B2) 


RI, S2(X2) 


or R1,S2 


Divide 


DR 


ID 


R1,R2 






Divide Decimal 


DP 


FD 


D1,(L1,B1),D2(L2,B2) 


Sl(Ll),S2(L2)or S1,S2 | 


Divide, Long 


DD 


6D 


Rl,D2(X2,B2),or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Divide, Long 


DDR 


2D 


R1,R2 






Divide, Short 


DE 


7D 


RI,D2(X2,B2)orRl,D2(,B2) 


RI,S2(X2) 


or R1,S2 


Divide, Short 


DER 


3D 


R1,R2 






Edit 


ED 


DE 


D1(L,B1),D2(B2) 


S1(L),S2 


or SI, 52 


Edit and Mark 


EDMK 


DF 


D1(L,B1),D2(B2) 


SI(L),S2 


or S1,S2 


Exclusive Or 


X 


57 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Exclusive Or 


XC 


D7 


D1(L,B1),D2(B2) 


S1(L),S2 


or SI , S2 


Exclusive Or 


XR 


17 


R1,R2 






Exclusive Or Immediate 


XI 


97 


D1(B1),12 


SI, 12 




Execute 


EX 


44 


Rl,D2(X2,B2)or R1,D2(,B2) 


RI,S2(X2) 


R1,S2 


Halve, Long 


HDR 


24 


R1,R2 






Halve, Short 


HER 


34 


R1,R2 






Halt Device 


HDV 


9E0l' 


D1,B1 


SI 




Halt I/O 


HIO 


9E00' 


Dl(Bl) 






Insert Character 


IC 


43 


Rl,D2{X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Insert Characters 


ICM 


BF 


R1,M3,D2(B2) 


R1,M3,S2 




under Mask 












Insert Storage Key 


ISK 


09 


R1,R2 






Load 


L 


58 


R1,D2(X2,B2) or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Load 


LR 


18 


R1,R2 






Load Address 


LA 


41 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Load and Test 


LTR 


12 


R1,R2 






Load and Test, Long 


LTDR 


22 


R1,R2 






Load and Test, Short 


LTER 


32 


R1,R2 






Load Complement 


LCR 


13 


R1,R2 






Load Complement, Long 


LCDR 


23 


R1,R2 






Load Complement, Short 


LCER 


33 


R1,R2 






Load Control 


LCTL 


B7 


R1,R3,D2(B2) 


R1,R3,S2 




Load Halfword 


LH 


48 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Load, Long 


LD 


68 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Load, Long 


LDR 


28 


R1,R2 






Load Multiple 


LM 


98 


R1,R3,D2(B2) 


R1,R3,S2 




Load Negative 


LNR 


11 


R1,R2 






Load Negative, Long 


LNDR 


21 


R1,R2 






Load Negative, Short 


LNER 


31 


R1,R2 






Load Positive 


LPR 


10 


R1,R2 






Load Positive, Long 


LPDR 


20 


RI,R2 






Load Positive, Short 


LPER 


30 


R1,R2 






Load PSW 


LPSW 


82 


Dl(Bl) 


SI 




Load Real Address 


LRA 


B1 


R1,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)o 


R1,S2 


Load Rounded, Extended 


LRDR 


25 


R1,R2 






to Long 












Load Rounded, Long to 


LRER 


35 


R1,R2 






Short 












Load, Short 


LE 


78 


R1,D2{X2,B2) or R1,D2(,B2) 


R1,S2(X2) 


or Rl , S2 


Load, Short 


LER 


38 


R1,R2 






Monitor Call 


MC 


AF 


D1(B1),I2 


SI, 12 




Move Characters 


MVC 


D2 


D1(L,B1),D2{B2) 


S1{L),S2 


or SI,S2 


Move Immediate 


MVI 


92 


Dl(Bl), 12 


SI, 12 





See Note 1 at end of 
this appendix 
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Type of 
Instruction 


Program Interruptions 










Instruction 


Possible 




Condition Code Set 




A 


s 


Ov 


P 


Op 


Other 


00 


01 


10 


11 


Compare Logical 


RR 


x 












Z 


AA 


BB 




Compare Logical 


RS 


X 






X 


X 




XX 


YY 


zz 




Characters under 
























Mask 
























Compare Logical Immediate 


SI 


X 












Z 


AA 


BB 




Compare Logical Long 


RR 


X 


X 




X 


X 




z 


AA 


BB 




Compare, Long 


RX, Floating Pt. 


X 


X 






X 




z 


AA 


BB 




Compare, Long 


RR, Floating Pt. 


X 


X 






X 




z 


AA 


BB 




Compare, Short 


RX, Floating Pt. 


X 


X 






X 




z 


AA 


BB 




Compare, Short 


RR, Floating Pt. 




X 






X 




z 


AA 


BB 




Convert to Binary 


RX 


X 


X 








Data,F 


N 


N 


N 


N 


Convert to Decimal 


RX 


X 


X 




X 






N 


N 


N 


N 


Divide 


RX 


X 


X 








F 


N 


N 


N 


N 


Divide 


RR 




X 








F 


N 


N 


N 


N 


Divide Decimal 


SS, Decimal 


X 


X 




X 


X 


D, Data 


N 


N 


N 


N 


Divide, Long 


RX,Floating Pt. 


X 


X 


E 




X 


B,E 


N 


N 


N 


N 


Divide, Long 


RR, Floating Pt. 




X 


E 




X 


B,E 


N 


N 


N 


N 


Divide, Short 


RX, Floating Pt. 


X 


X 


E 




X 


B,E 


N 


N 


N 


N 


Divide, Short 


RR, Floating Pt. 




X 


E 




X 


B,E 


N 


N 


N 


N 


Edit 


SS, Decimal 


X 






X 


X 


Data 


s 


T 


U 




Edit and Mark 


SS, Decimal 


X 






X 


X 


Data 


s 


T 


U 




Exclusive Or 


RX 


X 


X 










J 


K 






Exclusive Or 


SS 


X 






X 






J 


K 






Exclusive Or 


RR 














J 


K 






Exclusive Or Immediate 


SI 


X 






X 






J 


K 






Execute 


RX 


X 


X 








G 


(May be 


set by this instruction) 




Halve, Long 


RR, Floating Pt. 




X 






X 




N 


N 


N 


N 


Halve, Short 


RR, Floating Pt. 




X 






X 




N 


N 


N 


N 


Halt Device 


S 












A 


AAM 


CC 


AAL 




Halt I/O 


S 












A 


DD 


cc 


GG 


KK 


Insert Character 


RX 


X 












N 


N 


N 


N 


Insert Characters under 


RS 


X 






X 


X 




UU 


TT 


SS 




Mask 
























Insert Storage Key 


RR 


X 


X 






X 


A 


N 


N 


N 


N 


Load 


RX 


X 


X 










N 


N 


N 


N 


Load 


RR 














N 


N 


N 


N 


Load Address 


RX 














N 


N 


N 


N 


Load and Test 


RR 














J 


L 


M 




Load and Test, Long 


RR, Floating Pt. 




X 






X 




R 


L 


M 




Load and Test, Short 


RR, Floating Pt. 




X 






X 




R 


L 


M 




Load Complement 


RR 






F 








P 


L 


M 


O 


Load Complement, Long 


RR, Floating Pt. 




X 






X 




R 


L 


M 




Load Complement, Short 


RR, Floating Pt. 




X 






X 




R 


L 


M 




Load Control 


RS 


X 


X 




X 


X 


A 


N 


N 


N 


N 


Load Halfv/ord 


RX 


X 


X 










N 


N 


N 


N 


Load, Long 


RX, Floating. Pt. 


X 


X 






X 




N 


N 


N 


N 


Load, Long 


RR, Floating Pt. 




X 






X 




N 


N 


N 


N 


Load Multiple 


RS 


X 


X 










N 


N 


N 


N 


Load Negative 


RR 














J 


L 






Load Negative, Long 


RR, Floating Pt. 




X 






X 




R 


L 






Load Negative, Short 


RR, Floating Pt. 




X 






X 




R 


L 






Load Positive 


RR 






F 








J 




M 


O 


Load Positive, Long 


RR, Floating Pt. 




X 






X 




R 


L 


M 




Load Positive, Short 


RR, Floating Pt. 




X 






X 




R 


L 


M 




LoadPSW 


SI 


X 


X 








A 


QQ 


QQ 


QQ 


QQ 


Load Real Address 


RX 


X 


X 






X 


A 


AAV 


AAU 


AAP 


AAO 


Load Rounded, Extended 


RR, Floating Pt. 




X 


E 




X 




N 


N 


N 


N 


to Long 
























Load Rounded, Long to 


RR, Floating Pt. 




X 


E 




X 




N 


N 


N 


N 


Short 
























Load, Short 


RX, Floating Pt . 


X 


X 






X 




N 


N 


N 


N 


Load, Short 


RR, Floating Pt. 




X 






X 




N 


N 


N 


N 


Monitor Call 


SI 




X 






X 


GA 


N 


N 


N 


N 


Move Characters 


SS 


X 






X 






N 


N 


N 


N 


Move Immediate 


SI 


X 






X 






N 


N 


N 


N 
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Mnemonic 


Machine 


Operand Format 




Instruction 


Operation 
Code 


Operation 
Code 


Explicit 


Im 


plicit 


Move Long 


MVCL 


OE 


R1,R2 






Move Numerics 


MVN 


Dl 


D1(L,B1),D2(B2) 


S1(L),S2 


orSl,S2 


Move with Offset 


MVO 


F1 


D1(L1,B1),D2(L2,B2) 


Sl(L1),S2(L2)orSl,S2 1 


Move Zones 


MVZ 


D3 


D1(L,B1),D2(B2) 


SUL),S2 


orSl,S2 


Multiply 


M 


5C 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Multiply 


MR 


IC 


R1,R2 






Multiply Decimal 


MP 


FC 


D1(L1,B1),D2(L2,B2) 


Sl(Ll),S2(L2)orSl,S2 | 


Multiply Extended 


MXR 


26 


R1,R2 






Multiply Halfword 


MH 


4C 


R1,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Multiply, Long 


MD 


6C 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Multiply, Long 


MDR 


2C 


R1,R2 






Multiply, Long to 


MXD 


67 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Extended 












Multiply, Long to 


MXDR 


27 


R1,R2 






Extended 












Multiply, Short 


ME 


7C 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1;S2(X2) 


or R1,S2 


Multiply, Short 


MER 


3C 


R1,R2 






No Operation 


NOP 


47(BC 0) 


D2(X2,B2)or D2(,B2) 


S2(X2) 


orS2 


No Operation 


NO PR 


07 (BC 0) 


R2 






Or Logical 


O 


56 


R1,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Or Logical 


OC 


D6 


D1(L,B1),D2(B2) 


S1(L),S2 


orSl,S2 


Or Logical 


OR 


16 


R1,R2 






Or Logical Immediate 


Ol 


96 


D1(B1), 12 


SI, 12 




Pack 


PACK 


F2 


D1(L1,B1),D2(L2,B2) 


S1(L1),S2(L2)orSl,S2 


Purge Translation Lookaside 


PTLB 


B20D 


_ 


_ 




Buffer 












Read Direct 


RDD 


85 


D1(B1),I2 


SI, 12 




Reset Reference Bit 


RRB 


B213 


Dl(Bl) 


SI 




Set Clock 


SCK 


B204 


D 1 (B 1 ) 


SI 




Set Clock Comparator 


SCKC 


B206 


Dl(Bl) 


SI 




Set CPU Timer 


SPT 


B208 


Dl(Bl) 


SI 




Set Program Mask 


SPM 


04 


Rl 






Set Storage Key 


SSK 


08 


R1,R2 






Set System Mask 


SSM 


80 


D1(B1) 


SI 




Shift and Round Decimal 


SRP 


FO 


D1(L1,B1),D2(B2),I3 


S1(L1),S2, 


3 or S1,S2,I3 


Shift Left Double Algebraic 


SLDA 


8F 


R^,D2(B2) 


R1,S2 




Shift Left Double Logical 


SLDL 


8D 


R1,D2(B2) 


R1,S2 




Shift Left Single Algebraic 


SLA 


8B 


R1,D2(B2) 


R1,S2 




Shift Left Single Logical 


SLL 


89 


R1,D2(B2) 


R1,S2 




Shift Right Double Algebraic 


SRDA 


8E 


R1,D2(B2) 


R1,S2 




Shift Right Double Logical 


SRDL 


8C 


R],D2(B2) 


R1,S2 




Shift Right Single Algebraic 


SRA 


8A 


R1,D2(B2) 


R1,S2 




Shift Right Single Logical 


SRL 


88 


R1,D2(B2) 


R1,S2 




Start I/O 


SIO 


9C00] 


D1(B1) 


SI 




Start I/O Fast Release 


SIOF 


9cor 


D1(B1) 


SI 




Store 


ST 


50 


R1,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Store Channel ID 


STIDC 


B203 


D1{B1) 


SI 




Store Character 


STC 


42 


R1,D2(X2,B2)or R1,D2(,B2) 


R1,D2(X2) 


or R1,S2 


Store Characters under 

Mask 

Store Clock 


STCM 


BE 


RI,M3,D2(B2) 


R1,M3,S2 




STCK 


B205 


D1(B1) 


SI 




Store Clock Comparator 


STCKC 


B207 


D1(B1) 


SI 




Store Control 


STCTL 


B6 


R1,R3,D2(B2) 


R1,R3,S2 




Store CPU ID 


STIDP 


B202 


Dl(Bl) 


SI 




Store CPU Timer 


STPT 


B209 


Dl(Bl) 


SI 




Store Halfword 


STH 


40 


RI,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Store Long 


STD 


60 


RI,D2(X2,B2) 


R1,S2(X2) 


orRl,S2 


Store Multiple 


STM 


90 


RI,R2,D2(B2) 


R1,R2,S2 




Store Short 


STE 


70 


RI,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Store Then AND System Mask 


STNSM 


AC 


D1(B1),I2 


SI, 12 




Store Then OR System Mask 


STOSM 


AD 


D1(B1),I2 


SI, 12 




Subtract 


S 


5B 


RI,D2(X2)orRl,D2(X2,B2) 


R1,S2(X2) 


or R1,S2 


Subtract 


SR 


IB 


RI,R2 






Subtract Decimal 


SP 


FB 


D1(L1,B1),D2(L2,B2) 


S1(L1),S2(L2)orS1,S2 | 


Subtract Halfword 


SH 


4B 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


orRl,S2 


Subtract Logical 


SL 


5F 


RI,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Subtract Logical 


SLR 


IF 


RI,R2 







See Note 2 at end of 
this appendix 
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Program Interruptions 










Instruct-ion 


Type of 
Instruction 


PossibI 


e 






Condition Code Set 






A^ 


_s_ 


Ov 


_P_ 


Op 


Other 


00 


01 


10 


11 


Move Long 


RR 


X 


X 




X 


X 




AAA 


AAB 


AAC 


AAD 


Move Numerics 


SS 


X 






X 






N 


N 


N 


N 


Move with Offset 


SS 


X 






X 






N 


N 


N 


N 


Move Zones 


SS 


X 






X 






N 


N 


N 


N 


Multiply 


RX 


X 


X 










N 


N 


N 


N 


Multiply 


RR 




X 










N 


N 


N 


N 


Multiply Decimal 


SS, Decimal 


X 


X 




X 


X 


Data 


N 


N 


N 


N 


Multiply Extended 


RR, Floating Pt. 




X 


E 




X 


B 


N 


N 


N 


N 


Multiply Halfword 


RX 


X 


X 










N 


N 


N 


N 


Multiply, Long 


RX, Floating Pt. 


X 


X 


E 




X 


6 


N 


N 


N 


N 


Multiply, Long 


RR, Floating Pt. 




X 


E 




X 


B 


N 


N 


N 


N 


Multiply, Long/ 


RX, Floating Pt. 


X 


X 


E 


X 


X 


B 


N 


N 


N 


N 


Extended 
























Multiply, Long/ 


RR, Floating Pt. 




X 


E 




X 


B 


N 


N 


N 


N 


Extended 
























Multiply, Short 


RX, Floating Pt. 


X 


X 


E 




X 


B 


N 


N 


N 


N 


Multiply, Short 


RR,Floating Pt. 




X 


E 




X 


B 


N 


N 


N 


N 


No Operation 


RX, Ext. Mnemonic 














N 


N 


N 


N 


No Operation 


RR, Ext. Mnemonic 














N 


N 


N 


N 


Or Logical 


RX 


X 


X 










J 


K 






Or Logical 


SS 


X 






X 






J 


K 






Or Logical 


RR 














J 


K 






Or Logical Immediate 


SI 


X 






X 






J 


K 






Pack 


SS 


X 






X 






N 


N 


N 


N 


Purge Translation Lookaside 


S 










X 


A 


N 


N 


N 


N 


Buffer 
























Read Direct 


SI 


X 






X 


X 


A 


N 


N 


N 


N 


Reset Reference Bit 


S 










X 


A 


AAQ 


AAR 


AAS 


AAT 


Set Clock 


S 


X 


X 




X 


X 


A 


AAE 


AAF 




AAG 


Set Clock Comparator 


S 


X 


X 




X 


X 


A 


N 


N 


N 


N 


Set CPU Timer 


s 


X 


X 




X 


X 


A 


N 


N 


N 


N 


Set Program Mask 


RR 














RR 


RR 


RR 


RR 


Set Storage Key 


RR 


X 


X 






X 


A 


N 


N 


N 


N 


Set System Mask 


SI 


X 










A 


N 


N 


N 


N 


Shift Left Double Algebraic 


RS 




X 


F 








J 


L 


M 


O 


Shift and Round Decimal 


SS 


X 




D 


X 


X 


Data 


J 


L 


M 


O 


Shift Left Double Logical 


RS 




X 










N 


N 


N 


N 


Shift Left Single Algebraic 


RS 






F 








J 


L 


M 


O 


Shift Left Single Logical 


RS 














N 


N 


N 


N 


Shift Right Double Algebraic 


RS 




X 










J 


L 


M 




Shift Right Double Logical 


RS 




X 










N 


N 


N 


N 


Shift Right Single Algebraic 


RS 














J 


L 


M 




Shift Right Single Logical 


RS 














N 


N 


N 


N 


Start I/O 


S 












A 


MM 


CC 


EE 


KK 


Start I/O Fast Release 


S 












A 


MM 


cc 


EE 


KK 


Store 


RX 


X 


X 




X 






N 


N 


N 


N 


Store Channel ID 


S 










X 


A 


AAH 


CC 


AAI 


KK 


Store Character 


RX 


X 






X 






N 


N 


N 


N 


Store Characters under 


RS 


X 






X 


X 




N 


N 


N 


N 


Mask 
























Store Clock 


S 


X 






X 


X 




AAJ 


AAK 


AAN 


AAG 


Store Clock Comparator 


S 


X 


X 




X 


X 


A 


N 


N 


N 


N 


Store Control 


RS 


X 


X 




X 


X 


A 


N 


N 


N 


N 


Store CPU ID 


S 


X 


X 




X 


X 


A 


N 


N 


N 


N 


Store CPU Timer 


S 


X 


X 




X 


X 


A 


N 


N 


N 


N 


Store Halfv^ord 


RX 


X 


X 




X 






N 


N 


N 


N 


Store Long 


RX, Floating Pt. 


X 


X 




X 


X 




N 


N 


N 


N 


Store Multiple 


RS 


X 


X 




X 






N 


N 


N 


N 


Store Short 


RX, Floating Pt. 


X 


X 




X 


X 




N 


N 


N 


N 


Store Then AND System Mask 


SI 


X 






X 


X 


A 


N 


N 


N 


N 


Store Then OR System Mask 


SI 


X 






X 


X 


A 


N 


N 


N 


N 


Subtract 


RX 


X 


X 


F 








V 


X 


Y 


O 


Subtract 


RR 






F 








V 


X 


Y 


O 


Subtract Decimal 


SS, Decimal 


X 




D 


X 


X 


Daia 


V 


X 


Y 


o 


Subtract Halfword 


RX 


X 


X 


F 








V 


X 


Y 


o 


Subtract Logical 


RX 


X 


X 












W,H 


v,i 


W,| 


Subtract Logical 


RR 




, 












W,H 


v,i 


W, 1 
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Mnemonic 


Machine 


Operand Format | 


Instruction 


Operation 


Operation 








Code 


Code 


Explicit 


Implicit 


Subtract Normalized, 


SXR 


37 


R1,R2 




Extended 










Subtract Normalized, Long 


SD 


6B 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) orRl,S2 


Subtract Normalized, Long 


SDR 


2B 


R1,R2 




Subtract Normalized, Short 


SE 


7B 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) orRl,S2 


Subtract Normalized, Short 


SER 


3B 


R1,R2 




Subtract Unnormalized, Long 


sw 


6F 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) orR1,S2 


Subtract Unnormalized, Long 


SWR 


2F 


R1,R2 




Subtract Unnormalized, Short 


SU 


7F 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) orRl,S2 


Subtract Unnormalized, Short 


SUR 


3F 


R1,R2 




Supervisor Coll 


SVC 


OA 


1 




Test and Set 


TS 


93 


D1(B1) 


SI 


Test Channel 


TCH 


9F 


Dl(Bl) 


SI 


Test I/O 


TIO 


9D 


D1(B1) 


SI 


Test Under Mask 


TM 


91 


DI(B1),I2 


SI, 12 


Translate 


TR 


DC 


D1(L,B1),D2(B2) 


S1(L),S2 orSl,S2 


Translate and Test 


TRT 


DD 


D1(L,B1),D2(B2) 


SI(L),S2 orSl,S2 


Unpack 


UNPK 


F3 


D1(L1,B1),D2(L2,B2) 


Sl(L1),S2(L2)orSl,S2 


Write Direct 


WRD 


84 


D](B1),I2 


SI, 12 


Zero and Add Decimal 


ZAP 


F8 


D1(L1,B1),D2(L2,B2) 


Sl(Ll),S2(L2)or S1,S2 
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Instruction 


Type of 
Instruction 


Program Interruptions 
Possible 


Condition Code Set 




A 


s 


Ov 


P_ 


Op 


Other 


00 


01 


10 


11 


Subtract Nomialized, 


RR,Floating Pt. 




X 


E 




X 


B,C 


R 


L 


M 




Extended 
























Subtract Normalized, Long 


RX, Floating Pt, 


X 


X 


E 




X 


B,C 


R 




M 


Q 


Subtract Normalized, Long 


RR,Floating Pt. 




X 


E 




X 


B,C 


R 




M 


Q 


Subtract Normalized, Short 


RX, Floating Pt. 


X 


X 


E 




X 


B,C 


R 




M 


Q 


Subtract Normalized, Short 


RR, Floating Pt. 




X 


E 




X 


B,C 


R 




M 


Q 


Subtract Unnormalized, Long 


RX, Floating Pt. 


X 


X 


E 




X 


C 


R 




M 


Q 


Subtract Unnormalized, Long 


RR, Floating Pt. 




X 


E 




X 


C 


R 




M 


Q 


Subtract Unnormalized, Short 


RX, Floating Pt. 


X 


X 


E 




X 


C 


R 




M 


Q 


Subtract Unnormalized, Short 


RR,Floating Pt. 




X 


E 




X 


C 


R 




M 


Q 


Supervisor Call 


RR 














N 


N 


N 


N 


Test and Set 


SI 


X 






X 






SS 


IT 






Test Channel 


SI 












A 


JJ 


II 


FF 


HH 


Test I/O 


SI 












A 


LL 


CC 


EE 


KK 


Test Under Mask 


SI 


X 












UU 


VV 




WW 


Translate 


SS 


X 






X 






N 


N 


N 


N 


Translate and Test 


SS 


X 












PP 


NN 


OO 




Unpack 


SS 


X 






X 






N 


N 


N 


N 


Write Direct 


SI 


X 








X 


A 


N 


N 


N 


N 


Zero and Add Decimal 


SS, Decimal 


X 




D 


X 


X 


Data 


J 


L 


M 


O 



Program 


nterruptions Possible 


Under 


Ov: D = Decimal 




E = Exponent 




F = Fixed Point 


Under 


Other: 




A Privileged Operation 




B Exponent Underflow 




C Significance 




D Decimal Divide 




E Floating Point Divide 




F Fixed Point Divide 




G Execute 




GA Monitoring 


Condition Code Set 


H 


No Carry 


1 


Carry 


J 


Result == 


K 


Result is Not Equal to Zero 


L 


Result is Less Than Zero 


M 


Result is Greater Than Zero 


N 


Not Changed 


O 


Overflow 


P 


Result Exponent Underflows 


Q 


Result Exponent Overflows 


R 


Result Fraction = 


S 


Result Field Equals Zero 


T 


Result Field is Less Than Zero 


U 


Result Field is Greater Than Zero 


V 


Difference = 


W 


Difference is Not Equal to Zero 


X 


Difference is Less Than Zero 


Y 


Difference is Greater Than Zero 


Z 


First Operand Equals Second Operand 


AA 


First Operand is Less Than Second Operand 


BB 


First Operand is Greater Than Second Operand 


CC 


CSW Stored 


DD 


Channel and Subchannel not Working 


EE 


Channel or Subchannel Busy 


FF 


Channel Operating in Burst Mode 


GG 


Burst Operation Terminated 



HH Channel Not Operational 

II Interruption Pending in Channel 

JJ Channel Available 

KK Not Operational 

LL Available 

MM I/O Operation Initiated and Channel Proceeding With 

its Execution 

NN Nonzero Function Byte Found Before the First Operand 

Field is Exhausted 

OO Lost Function Byte is Nonzero 

PP All Function Bytes Are Zero 

QQ Set According to Bits 34 and 35 of the New PSW Loaded 

RR Set According to Bits 2 and 3 of the Register Specified by Rl 

SS Leftmost Bit of Byte Specified = 

TT Leftmost Bit of Byte Specified = 1 

UU Selected Bits Are All Zeros; Mask is All Zeros 

VV Selected Bits Are Mixed (xeros and ones) 

WW Selected Bits Are All Ones 

XX Selected bytes are equal, or mask is zero 

YY Selected field of first operand is low 

ZZ Selected field of first operand is high 

AAA First-operand and second-operand counts ore equal 

AAB First operand count is lower 

AAC First operand count is higher 

AAD No movement because of destructive overlap 

AAE Clock value set 

AAF Clock value secure 

AAG Clock not operational 

AAH Channel ID correctly stored 

AAI Channel activity prohibited during ID 

AAJ Clock value is valid 

AAK Clock value not necessarily valid 

AAL Channel working with another device 

AAM Subchannel busy or interruption pending 

AAN Clock in error state 

AAO Segment- or Page-Table Length Violation 

AAP Page-Table Entry Invalid (1-Bit One) 

AAQ Reference Bit Zero, Change Bit Zero 

AAR Reference Bit Zero, Change Bit One 

AAS Reference Bit One, Change Bit Zero 

AAT Reference Bit One, Change Bit One 

AAU Segment Table Entry Invalid (1-Bit One) 

AAV Translation Available 
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RR Format 


Operation 


Name 


Mnemonic 


Remarks 


Code 








00 








01 








02 








03 








04 


Set Program Mask 


SPM 




05 


Branch and Link 


BALR 




06 


Branch on Count 


BCTR 




07 


Branch on Condition 


BCR 




08 


Set Storage Key 


SSK 




09 


Insert Storage Key 


ISK 




OA 


Supervisor Call 


SVC 




OB 








OC 








OE 


Move Long 


MVCL 




OF 


Compare Logical Long 


CLCL 




10 


Load Positive 


LPR 




11 


Load Negative 


LNR 




12 


Load and Test 


LTR 




13 


Load Complement 


LCR 




14 


AND 


NR 




15 


Compare Logical 


CLR 




16 


OR 


OR 




17 


Exclusive OR 


XR 




18 


Load 


LR 




19 


Compare 


CR 




lA 


Add 


AR 




IB 


Subtract 


SR 




IC 


Multiply 


MR 




ID 


Divide 


DR 




IE 


Add Logical 


ALR 




IF 


Subtract Logical 


SLR 




20 


Load Positive (Long) 


L,PDR 




21 


Load Negative (Long) 


LNDR 




22 


Load and Test (Long) 


LTDR 




23 


Load Complement (Long) 


LCDR 




24 


Halve (Long) 


HDR 




25 


Load Rounded (Extended to Long) 


LRjJR 




26 


Multiply (Extended) 


:-iXR 




27 


Multiply (Long to Extended) 


MXDR 




28 


Load (Long) 


LDR 




29 


Compare (Long) 


CDR 




2A 


Add Normalized (Long) 


ADR 




2B 


Subtract Normalized 


SDR 




2C 


Multiply (Long) 


MDR 




2D 


Divide (Long) 


DDR 




2E 


Add Unnormalized (Long) 


7\WR 




2F 


Subtract Unnormalized (Long) 


SWR 




3 


Load Positive (Short) 


LPER 




31 


Load Negative (Short) 


LNER 




3 2 


Load and Test (Short) 


LTER 




3 3 


Load Complement (Short) 


LCER 




3 4 


Halve (Short) 


HER 




3 5 


Load Rounded (Long or Short) 


LRER 




3 6 


Add Normalized (Extended) 


AXR 




3 7 


Subtract Normalized (Extended) 


SXR 




3 8 


Load (Short) 


l.ER 
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RR Format 


Operation 


Name 


Mnemonic 


Remarks 


Code 








39 


Compare (Short) 


CER 




3A 


Add Normalized (Short) 


AER 




3B 


Subtract Normalized (Short) 


SER 




3C 


Multiply (Short) 


MER 




3D 


Divide (Short) 


DER 




3E 


Add Unnormalized (Short) 


AUR 




3F 


Subtract Unnormalized (Short) 


SUR 




RX Format 


40 


Store Half word 


STH 




41 


Load Address 


LA 




42 


Store Character 


STC 




43 


Insert Character 


IC 




44 


Execute 


EX 




45 


Branch and Link 


BAL 




46 


Branch on Count 


BCT 




47 


Branch on Condition 


BC 




48 


Load Halfword 


LH 




49 


Compare Halfword 


CH 




4A 


Add Halfword 


AH 




4B 


Subtract Halfword 


SH 




4C 


Multiply Halfword 


MH 




4E 


Convert to Decimal 


CVD 




4F 


Convert to Binary 


CVB 




50 


Store 


ST 




51 








52 








53 








54 


AND 


N 




55 


Compare Logical 


CL 




56 


OR 







57 


Exclusive OR 


X 




58 


Load 


L 




59 


Compare 


C 




5A 


Add 


A 




5B 


Subtract 


S 




5C 


Multiply 


M 




5D 


Divide 


D 




5E 


Add Logical 


AL 




5F 


Subtract Logical 


SL 




60 


Store (Long) 


STD 




61 








62 








63 








64 








65 








66 








67 


Multiply (Long to Extended) 


MXD 




68 


Load (Long) 


LD 




69 


Compare (Long) 


CD 




6A 


Add Normalized (Long) 


AD 




6B 


Subtract Normalized (Long) 


SD 




6C 


Multiply (Long) 


MD 




6D 


Divide (Long) 


DD 




6E 


Add Unnormalized (Long) 


AW 




6F 


Subtract Unnormalized (Long) 


SW 
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RX Format 








Operation 


Name 


Mnemonic 


Remarks 


Code 








70 


Store (Short) 


STE 




71 








72 








73 








74 








75 








76 








77 








78 


Load (Short) 


LE 




79 


Compare (Short) 


CE 




7A 


Add Normalized (Short) 


AE 




7B 


Subtract Normalized (Short) 


SE 




7C 


Multiply (Short) 


ME 




7D 


Divide (Short) 


DE 




7E 


Add Unnormalized (Short) 


AU 




7F 


Subtract Unnormalized (Short) 


SU 




RS,SI, and S 


Format 






80 


Set System Mask 


SSM 




81 








82 


Load PSW 


LPSW 




83 


Diagnose 






84 


Write Direct 


WRD 




85 


Read Direct 


RDD 




86 


Branch on Index High 


BXH 




87 


Branch on Index Low or Equal 


BXLF 




88 


Shift Right Single Logical 


SRL 




89 


Shift Left Single Logical 


SLL 




8A 


Shift Right Single 


SRA 




8B 


Shift Left Single 


SLA 




8C 


Shift Right Double Logical 


SRDL 




8D 


Shift Left Double Logical 


SLDL 




8E 


Shift Right Double 


SRDA 




8F 


Shift Left Double 


SLDA 




90 


Store Multiple 


STM 




91 


Test under Mask 


TM 




92 


Move (Immediate) 


MVI 




93 


Test and Set 


TS 




94 


AND (Immediate) 


NI 




95 


Compare Logical (Immediate) 


CLI 




96 


OR (Immediate) 


01 




97 


Exclusive OR ( Irrmiediate ) 


XI 




98 


Load Multiple 


LM 




99 








9A 








9B 








9C 


Start I/O, Start I/O Fast Release 


SIO,SIOF 


See Note 2 


9D 


Test I/O 


TIO 




9E 


Halt I/O, Halt Device 


HIO,HDV 


See Note 1 


9F 


Test Channel 


TCH 




AO 








Al 








A2 








A3 








A4 








A5 








A6 
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RS,SI, and S Format 




Operation 


Name 


Mnemonic 


Remarks 


Code 








A7 








A8 








A9 








AA 






ef) 


AB 








AC 


Store Then AND System Mask 


STNSM 




AD 


Store Then OR System Mask 


STOSM 




AE 








AF 


Monitor Call 


MC 




BO 








Bl 


Load Real Address 


LRA 




B2 


(First byte of two-byte operation code 


S) 




B3 








B4 








B5 








B6 


Store Control 


STCTL 




B7 


Load Control 


LCTL 


• 


B8 








B9 








BA 








BE 








BC 








BD 


Compare Logical Characters under Mask 


CLM 




BE 


Store Characters under Mask 


STCM 




BF 


Insert Characters under Mask 


ICM 




SS Format 


CO 








CI 








C2 








C3 








C4 








C5 








C6 








C7 








C8 








C9 








CA 








CB 








CC 








CD 








CE 








CF 








DO 








Dl 


Move Numerics 


MVN 




D2 


Move (Characters) 


MVC 




D3 


Move Zones 


MVZ 




D4 


AND (Characters) 


NC 




D5 


Compare Logical (Characters) 


CLC 




06 


OR (Characters) 


OC 




D7 


Exclusive OR (Characters) 


XC 




D8 








09 








OA 






m 


DB 








DC 


Translate 


TR 
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SS Format 




Operation 


Name 


Mnemonic 


Remarks 


Code 








DD 


Translate and Test 


TRT 




DE 


Edit 


ED 




DF 


Edit and Mark 


EDMK 




EO 








El 








E2 








E3 








E4 








E5 








E6 








E7 








W8 








E9 








EA 








EB 








EC 








ED 








EE 








EF 








FO 


Shift and Round Decimal 


SRP 




Fl 


Move with Offset 


MVO 




F2 


Pack 


PACK 




F3 


Unpack 


UNPK 




F4 








F5 








F6 








F7 








F8 


Zero and Add Decimal 


ZAP 




F9 


Compare Decimal 


CP 




FA 


Add Decimal 


AP 




FB 


Subtract Decimal 


SP 




FC 


Multiply Decimal 


MP 




FD 


Divide Decimal 


DP 




FE 








FF 




1 



NOTES 



1. Under the System/370 architecture, the machine operations for Halt Device and Halt 
I/O are as follows: 



1001 1110 XXXX XXXO 



1001 1110 XXXX XXXI 



Halt I/O 
Halt Device 



HIO 
HDV 



(X denotes an ignored bit position) 



130.4 



2. Under the SysteiV370 architecture, the machine operations for Start I/O and Start 
1/0 Fast Release are as follows: 

1001 1100 XXXX XXXO Start 1/0 SlO 

1001 1100 XXXX XXXI Start I/O Fast Release SIOP 

(X denotes an ignored bit position) 



Operation 






Code 


Name 


Mnemonic 


B202 


Store CPU ID 


STIDP 


B203 


Store Channel ID 


ST IDC 


B204 


Set Clock 


SCK 


B205 


Store Clock 


STCK 


B206 


Set Clock Comparator 


SCKC 


B207 


Store Clock Comparator 


STCKC 


B208 


Set CPU Timer 


SPT 


B209 


Store CPU Timer 


STPT 


B20D 


Purge Translation 






Lookaside Buffer 


PTLB 


B213 


Reset Reference Bit 


RRB 
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APPENDIX E: ASSEMBLER INSTRUCTIONS 



r T 

Operation 



Name Entry 



Operand Entry 



ACTR 



■+- 



Must not be present 



An arithmetic SETA expression 



AGO 



A sequence symbol or not present 



A sequence symbol 



AIF 



A sequence symbol or not present 



A logical expression enclosed in parenthe- 
ses, immediately followed by a sequence 
symbol 



ANOP 



A sequence symbol 



Will be taken as a remark 



CCW 



Any symbol or not present 



Four operands, separated by commas 



CNOP 



A sequence symbol or not present 



Two absolute expressions, separated by a 
comma 



COM 



A sequence symbol or not present 



Will be taken as a remark 



COPY 



Must not be present 



A symbol 



CSECT 



Any symbol or not present 



Will be taken as a remark 



CXD * 



Any symbol or not present 



Will be taken as a remark 



DC 



Any symbol or not present 



One or more operands, separated by commas 



DROP 



A sequence symbol or not present 



-+- 



One to sixteen absolute expressions, sepa- 
rated by commas 



DS 



H 



Any symbol or not present 



One or more operands, separated by commas 



DSECT 



A variable symbol or an 
ordinary symbol 



Will be taken as a remark 



DXD * 



A symbol 



One or more operands, separated by commas 



EJECT 



A sequence symbol or not present 



Will be taken as a remark 



END 



A sequence symbol 
or not present 



A relocatable expression 
or not present 



ENTRY 



A sequence symbol or not present 



One or more relocatable symbols, separated 
by commas 



EQU 



■+ 



A variable symbol or an 
ordinary symbol 



An absolute or relocatable expression 



EXTRN 



A sequence symbol or not present 



One or more relocatable symbols, separated 
by commas 



GBLA 



Must not be present 



One or more variable symbols that are to be 
used as SET symbols, separated by commas^ 



GBLB 



Must not be present 



One or more variable symbols that are to be 
used as SET symbols, separated by commas^ 



GBLC 



Must not be present 



One or more variable symbols that are to be 
used as SET symbols, separated by commas^ 



ICTL 



Must not be present 



One to three decimal values, separated by 
commas 



* Assembler F only 



J 
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1 Operation i ' ' 
' Entry ' Name Entry ' Operand Entry 


1 ISEQ 1 Must not be present i Two decimal values, separated by a comma | 


_ _ — — _ _ — _ _ _ 1 

LCLA Must not be present ' One or more variable symbols that are to , 
, , be used as SET symbols, separated by , 
L L J. commas 2 i 


' LCLB ' Must not be present ! One or more variable symbols that are to , 
11 , be used as SET symbols, separated by | 
t , 1 commas 2 i 


1 LCLC , Must not be present , One or more variable symbols separated , 
1 , 1 ^ commas 2 I 


' LTORG ' Any symbol or not present ^ Will be taken as a remark j 


' MACRO^ ' Must not be present ' Will be taken as a remark j 
1 mend'' I A sequence symbol or not present i Will be taken as a remark i 


, MEXIT^ L A sequence symbol or not present i Will be taken as a remark i 


' MNOTEl [ A sequence symbol, a variable , A severity code, followed by a comma, , 
, , symbol or not present i followed by any combination of characters i 
1 1 1 enclosed in apostrophes i 


f , ~ ... ___! _ __ _ __ -| 

, OPSYN* An ordinary symbol i A machine instruction mnemonic code, an , 
1 1 1 extended mnemonic code, or an operation i 
1 1 i code defined by a previous OPSYN instruc-i 
1 1 1 tion ' 


1 I ~ ~i~ ~~ ~~ — ~ 1 

1 1 A machine or extended mnemonic i Blank i 
1 1 operation code i • 


1 ORG 1 A sequence symbol or not present i A relocatable expression or not present i 


1 PRINT A sequence symbol or not present , One to three operands , 


' PUNCH ' A sequence symbol or not present ' One to eighty characters enclosed in ] 
] ' ] apostrophes , 




1 SETA 1 A SETA symbol 1 An arithmetic expression I 


1 1 1 enclosed in parentheses i 


I 1 1 a substring notation, or a concatenation i 

II 1 of character expressions and substring i 
' 1 ' notations ' 


1 SPACE 1 A sequence symbol or not present i A decimal self-defining term or not i 
1 1 1 present ' 


1 — _p____. __ ^ __ __ _._ _) 

1 START 1 Any symbol or not present i A self-defining term or not present i 


1 TITLe3 I A special symbol (0 to 4 char- , One to 100 characters, enclosed in , 
1 1 acters) , a sequence symbol, a | apostrophes i 
1 1 variable symbol, or not i i 
1 1 present i ' 


r - y. - - -, __ _ _ __, 

1 USING 1 A sequence symbol or not present i An absolute or relocatable expression i 
i 1 1 followed by 1 to 16 absolute expres- i 
• 1 ' sions, separated by commas ' 


1 WXTRN [ A sequence symbol or not present [ One or more relocatable symbols, sepa- { 
} 1 [ rated by commas { 


' 1 

1 May only be used as part of a macro-definition. ' 

1 'SET symbols may be defined as subscripted SET symbols. i 

1 See Section 5 for the description of the name entry. , 

Assembler F only. 
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ASSEMBLER STATEMENTS 



INSTRUCTION 



F- 



NAME ENTRY 



OPERAND ENTRY 



■+- 



Model Statements 3 *♦ 



4- 



An ordinary symbol, variable 
symbol, sequence variable 
symbol, a comoination of 
variable symbols and other 
characters that is equivalent 
to a symbol, or not present 



Any combination of char- 
acters (including variable 
symbols) 



Prototype Statement^ 



A symbolic parameter or 
not present 



Zero or more operands that 
are symbolic parameters, sep- 
arated by commas, followed by 
zero or more operands 
(separated by commas) of the 
form symbolic parameter, 
equal sign, optional standard 
value 



+- 



Macro- Instruction 
Statement^ 



+- 



An ordinary symbol, a 
variable symbol, a sequence 
symbol, a combination of 
variable symbols and other 
characters that is equivalent 
to a symbol,^ or not present 



Zero or more positional 
operands separated by commas, 
followed by zero or more 
keyword operands (separated 
by commas) of the form 
keyword, equal sign, value^ 



As 
St 



sembler Language 
atement^ *♦ 



An ordinary symbol, a var- 
iable symbol, a sequence 
symbol, a combination 
of variable symbols and 
other characters that is 
equivalent to a symbol, 
or not present 



Any combination of characters 
(including variable symbols) 



May only be used as part of a macro definition. 

Variable symbols appearing in a macro instruction are replaced by their values 

before the macro instruction is processed. 

Variable symbols may be used to generate assembler language mnemonic operation 

codes as listed in Section 5, except ACTR, COPY, END, ICTL, CSECT, DSECT, ISEQ, 

PRINT, REPRO, and START. Variable symbols may not be used in the name and 

operand entries of the following instructions: COPY, END, ICTL, and ISEQ. 

Variable symbols may not be used in the name entry of the ACTR instruction. 

No substitution for variables in the line following a REPRO statement is 

performed. 

When the name field of a macro instruction contains a sequence symbol, | 

the sequence symbol is not passed as a name field parameter. It only I 

has meaning as a possible branch target for conditional assembly. i 
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APPENDIX F: SUMMARY OP CONSTANTS 



T T 

NUMBER 
OF CON- 
STANTS 

PER 
OPERAND 



TYPE 



IMPLIED 

LENGTH 

(BYTES) 



ALIGN- 
MENT 



LENGTH 
MODI- 
FIER 
RANGE 



SPECIFIED 
BY 



RANGE 

FOR :ex- 

PONENTS 



+-- 



RANGE 

FOR 
SCALE 



TRUN- 
CATION/ 
PADDING 

SIDE 



as 
needed 



byte 



.1 to 
256 (1) 



characters 



one 



right 



as 
needed 



byte 



.1 to 
256 (1) 



hexadecimal 
digits 



one 



left 



as 
needed 



byte 



,1 to 
256 



binary 
digits 



one 



left 



word 



.1 to 

8 



decimal 
digits 



multi- 
ple 



-85 to 
+75 



-187 to 
+ 346 



left (t») 



half 
word 



.1 to 
8 



decimal 
digits 



multi- 
ple 



-85 to 
+75 



-187 
+ 3U6 



left (H) 



word 



.1 to 
8 



decimal 
digits 



multi- 
ple 



-85 to 
+75 



right (U) 



0-14 



double 
word 



1 to 



decimal 
digits 






L (3) 



16 



double 
word 



.1 to 
16 



decimal 
digits 






as 
needed 



byte 



1 to 
16 



decimal 
digits 



multi- 
ple 

multi- 
ple 

multi- 
ple 






-85 to 
+75 

-85 to 
+75 



0-14 
0-28 



right (4) 



right (4) 
left 



as 
needed 

+ 

4 



byte 
word 



.1 to 
16 



decimal 
digits 






.1 to 
4 (2) 



any 
express ior^ 



multi- 
ple 

+ 

multi- 
ple 






left 

1 

left 



Q(3) 

V 

S 









word 

word 

half 
word 



1-4 



+ + 

3 or 

4 



symbol nam- 
ing a DXD 
.0£_DS££T 

relocatable 
symbol 



multi- 
ple 



left 



multi- 
ple 






2 only 



one absolute 
or relocatab- 
le expression 
or two absol- 
ute express- 
ions: 
exp (exp) 



multi- 
ple 



left 



half 
word 



.1 to 
2 (2) 



any 
expression 



multi- 
ple 



left 



(1) In a DS assembler instruction C and X type constants may have length specification 
to 65535. 

(2) Bit length specification permitted with absolute expressions only. Relocatable A- 
type constants, 3 or 4 bytes only; relocatable Y-type constants, 2 bytes only. 

(3) Assembler F only. 

(4) Errors will be flagged if significant bits are truncated or if the value specified 
j cannot be contained in the implied length of the constant. j 
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APPENDIX G: MACRO LANGUAGE SUMMARY 



The four charts in this appendix summarize the macro language described in Part II of 
this publication. 

Chart 1 indicates which macro language elements may be used in the name and operand 
entries of each statement. 

Chart 2 is a summary of the expressions that may be used in macro-instruction 
statements. 

Chart 3 is a summary of the attributes that may be used in each expression. 

Chart 4 is a summary of the variable symbols that may be used in each expression. 



Statement 


Variable Symbols 














Sequence 
Symbol 

Name 


Global SET Symbols 


Local SET Symbols 


System Variable ^mbots 


Attributes 


Symbolic 
Parameter 


SETA 


SETB 


SETC 


SETA 


SETB 


SETC 


&SYSNDX 


&SYSECT 


&SYSUST 


Type 


Length 


Scaling 


Integer 


Count 


Number 


MACRO 
























Prototype 
Statement 


Name 
Operand 






















GBLA 




Operand 






















- - 




- - - 





GBIB 






Operand 


















GBLC 








Operand 
















■ - 







Operand 

-■ - — 

Operand^ 


Operand 
Operand^ 


LCLA 










Operand 














LCLB 












Operand 














LCLC 














Operand 












Model 
Stotement 


Name 

Operation 

Operand 


Name 

Operation 
Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 


Nome 

Operation 

Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 




SETA 


Operand^ 


Name 
Operand 


Operand 


Operand' 


Name 
Operond 


Operand 


Operand' 


Operond 




Operand^ 




Operand 
Operand^ 


Operand 
Operand^ 


Operond 
Operand^ 


SETB 


Operand^ 


Operand* 


Name 
Operand 


Operand* 


Operand 


Name 
Operand 


Operand* 


Operand 


Operand 


Operand* 


Operand^ 


SETC 


Operand 


Operand^ 


Operand® 


Name 
Operond 


Operand^ 


Operand® 


islame 
Operand 


Operand 


Operand 


Operand 


Operand 








AIF 


Operand* 


Operand* 


Operand 


Operand* 


Operand* 


Operand 


Operand* 


Operand 


Operand^ 


Operand* 


Operand^ 


Operand^ 


Operand^ 
Operand 


Operand^ 
Operand 


Operond^ 
Operand 


Operand^ 
Operand 


Name 
Operand 

Name 
Operand 

Name 
Nome 
Name 
Name 

Name 

Name 
Name 


AGO 


























ACTR 


Operand^ 


Operand 


Operand^ 


Operand 


Operand 


Operand^ 


Operand^ 


Operand 




Operand^ 




Operand 


ANOP 



























MEXIT 
































MNOTE 


Operand 


Operand 


Operand 


Operand 


Operand 


Operand 


Operand 


Operand 


Operand 


Operand 







-.- .. - „_ 


- - 







MEND 
























Outer 
Macro 




Name 
Operand 


Name 
Operand 


Name 
Operand 


Name 
Operond 


Name 
Operand 


Name 
Operand 












Inner 
Macro 


Name 
Operand 


Nome 
Operand 


Name 
Operand 


Name 
Operand 


Name 
Operand 


Name 
Operand 


Nome 
Operand 


Nome 
Operand 


Nome 
Operand 


Name 
Operand 




Assembler 
Language 
Statement 




Name 

Operation 

Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 


Nome 
Operation 

Operand 


Name 

Operation 

Operand 


Name 

Operation 
Operand 












1 . Variable symbols in macro- instructions are replaced by tfieir values before processing. 

2. Only if value is self-defining term. 

3. Converted to arithmetic +! or ^. 

4. Only in character relations. 

5. Only in arithmetic relations. 

6. Only In arithmetic or character relations. 

7. Converted to unsigned number. 

8. Converted to character 1 or 0. 

9. Only if one to eight decimal digits. 











Chart 1. Macro Language Elements 
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Chart 2. Conditional Assembly Expressions 



r T • T ■ 

1 Expression | Arithmetic Expressions | Character Expressions 



■T 1 

I Logical Expressions] 



h 



May 
contain 



1. Self-defining terms 

2. Length, scaling, 
integer, count, and 
number attributes 

3. SETA and SETB symbols 
U. SETC symbols whose 

value is 1-8 decimal 
digits 
5. Symbolic parameters 
if the corresponding 
operand is a self- 
defining term 
6SYSLIST(n) if the 
corresponding operand 
is a self-defining 
term 

6SYSLISTCn,m) if the 
corresponding operand 
is a self-defining 
term 
gSYSNDX 



6. 



7. 



8 



1. Any combination of 
characters enclosed 
in apostrophes 

2. Any variable symbol 
enclosed in apostrophes 

3. A concatenation of 
variable symbols and 
other characters 
enclosed in apostrophes 

U. A request for a type 
attribute 



1. SETB symbols 

2. Arithmetic re- 
lations^ 

3. Character re- 
lations^ 



Operators 

are # 



+,-,*, and / 
parentheses permitted 



concatenation, with a 
period (. ) 



AND, OR, and NOT 
parentheses per- 
mitted 



Range 

of values 



-231 to +231-1 



through 255 characters 



(false) or 

1 (true) 



May be 
used in 



1. SETA operands 

2. Arithmetic relations 

3. Subscripted SET 
symbols 

a. 6SYSLIST 

5. Substring notation 

6. Sublist notation 



1. SETC operands 3 

2. Character relations^ 



1. SETB operands 

2. AIF operands 



An arithmetic relation consists of two arithmetic expressions related by the 

operators GT, LT, EQ, NE, GE, or LE. 

A character relation consists of two character expressions related by the operator 

GT, LT, EQ, NE, GE, or LE. The type attribute notation and the substring notation 

may also be used in character relations. The maximum size of the character 

expressions that can be compared is 255 characters. If the two character 

expressions are of unequal size, then the smaller one will always compare less than 

the larger. 

Maximum of eight characters will be assigned. 
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Chart 3. Attributes 



r T T 

Attribute | Notation | May be used with: 



T 1 

May be used in 



May be used only if 
type attribute is: 



Type 



T* 



Symbols outside 
macro definitions; 
symbolic parameters, 
6SYSLIST(n), and 
6SYSLIST(n,m) inside 
macro definitions 



(May always be used) 



1 . SETC operand 
fields 

2. Character 
relations 



Length 



L' 



Symbols outside 
macro definitions; 
symbolic parameters, 
6SYSLIST(n), and 
6SYSLIST(n,m) inside 
macro definitions 



Any letter except 
M,N,0,T, and U 



Arithmetic 
expressions 



Scaling 



S' 



Symbols outside 
macro definitions; 
symbolic parameters, 
6SYSLIST(n), and 
6SYSLIST(n,m) inside 
macro definitions 



H,F,G,D,E,L,K,P, 
and Z 



Arithmetic 
expressions 



Integer 



Symbols outside 
macro- definitions ; 
symbolic parameters, 
fiSYSLIST(n), and 
eSYSLIST(n,m) inside 
macro definitions 



H,F,G,D,E,L,K,P, 
and Z 



Arithmetic 
expressions 



Count 



Symbolic parameters 
corresponding to 
macro instruction 
operands, SSYSLIST 
(n) , and 6SYSLIST(n,m) 
inside macro 
definitions 



Any letter 



Arithmetic 
expressions 



Number 



N* 



Symbolic parameters, 
gSYSLIST, and 
6SYSLIST(n) inside 
macro definitions 



Any letter 



Arithmetic 
expressions 



♦ NOTE: There are definite restrictions in the use of these attributes. 
Section 9. 



Refer to text, 
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Chart U. Variable Symbols 



r 

Variable 
symbol 

I- 



Defined by: 



•+- 



Initialized, 
or set to: 



Value changed 
by: 



May be used in: 



EJymbolic^ 
parameter 



Prototype 
statement 



Corresponding 
macro instruction 
operand 



(Constant 

throughout 

definition) 



+- 



1. Arithmetic expressions 
if operand is self- 
defining term 

2. Character expressions 



SETA 



LCLA or GBLA 
instruction 



SETA 
instruction 



1. Arithmetic expressions 

2. Character expressions 



;etb 



LCLB or GBLB 
instruction 



SETB 
instruction 



1. Arithmetic expressions 

2. Character expressions 

3. Logical expressions 



SETC 



LCLC or GBLC 
instruction 



Null character 
value 



SETC 
instruction 



1. Arithmetic expressions 
if value is self- 
defining term 

2. Character expressions 



gSYSNDX*^ 



The assembler 



Macro instruction 
index 



(Constant 
throughout 
definition; 
unique for 
each macro- 
instruction) 



1. Arithmetic expressions 

2. Character expressions 



&SYSECT1- 



6SYSLIST1- 



The assembler 



Control section 
in which macro 
instruction 
appears 



(Constant 
throughout 
definition; 
set by CSECT, 
DSECT, and 
START) 



Character expressions 



The assembler 



Not applicable 



— + 



Not applicable 



4- 



N'gSYSLIST in arithmetic 
expressions 



6SYSLIST(n)i- 
£SYSLIST(n,ra) 



The assembler 



Corresponding 
macro instruction 
operand 



(Constant 

throughout 

definition) 



|. 

I ^ May only 

L 



•+- 



■+- 



1. Arithmetic expressions 
if operand is self- 
defining term 

2. Character expressions 



H 



be used in macro definitions. 
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APPENDIX H: SAMPLE PROGRAM 



Given : 

1. A TABLE with 15 entries, each 16 bytes long, having the following format: 

r T T ■ T 1 

I NUMBER of items j SWITCHes j ADDRESS j NAME | 

L i .J— X J 

3 bytes 1 byte U bytes 8 bytes 

2. A LIST of items, each 16 bytes long, having the following format: 

r T T T T 

I NAME I SWITCHes j NUMBER of items j ADDRESS j 

L J. X X J 

8 bytes 1 byte 3 bytes 4 bytes 

Find: Any of the items in the LIST which occur in the TABLE and put the SWITCHes, 
NUMBER of items, and ADDRESS from that LIST entry into the corresponding TABLE 
entry. If the LIST item does not occur in the TABLE, turn on the first bit in 
the SWITCHes byte of the LIST entry. 

The TABLE entries have been sorted by their NAME. 



PRINT DATA 

THIS IS THE MACRO DEFINITION 

MACRO 

HOVE £,TO,£FROM 

DEFINE SETC SYMBOL 

LCLC tTYPE 

CHECK NUMBER OF OPERANDS 

AIF (N'CSYSLIST NE 2».ERR0R1 

CHECK TYPE ATTRIBUTES OF OPERANDS 

AIF (T'tTO NE T'fiFR0M).ERR0R2 

AIF (T'tTO EQ •€* OR T'tTO EQ 'G- OR T'tTO EQ 'K'j.TYPECGK 

AIF (T'fiTO EQ 'D' OR T'CTO EQ 'E' OR T'tTO EQ 'H'j.TYPEOtH 

AIF (T'tTO EQ 'F'J.MOVE 

AGO .ERRORS 

ANOP 

ASSIGN TYPE ATTRIBUTE TO SETC SYMBOL 

SETC T'tTO 

ANOP 

♦ NEXT THO STATEMENTS GENERATED FOR MOVE MACRO 
L6TYPE 2,6FROM 

STtTYPE 2,£T0 

MEXIT 
.* 
.>f CHECK LENGTH ATTRIBUTES OF OPERANDS 

•TYPECGK AIF <L«tTO NE L'£FROM OR L'tTO GT 256J.ERR0R4 

* NEXT STATEMENT GENERATED FOR MOVE MACRO 
MVC £TO>&FROM 

MEXIT 



•TYPEOEH 

.* 
,* 

£TYPE 

.MOVE 



.* 
.* 



ERROR MESSAGES FOR INVALID MOVE MACRO INSTRUCTIONS 



SAMPLOOl 
SAMPL002 
SAMPL003 
SAMPL004 
SAMPL005 
SAMPL006 
SAMPL007 
SAMPL008 
SAMPL009 
SAMPLOIO 
SAMPLOll 
SAMPL01.2 
SAMPL013 
SAMPL014 
SAMPL015 
SAMPL016 
SAMPL017 
SAMPL018 
SAMPL019 
SAMPL020 
SAMPL021 
SAMPL022 
SAMPL023 
SAMPL024 
SAMPL025 
SAMPL026 
SAMPL027 
SAMPL028 
SAMPL029 
SAMPL030 
SAMPL03I 
SAMPL032 
SAMPL033 
SAMPL034 
SAMPL035 
SAHPL036 
SAMPL037 
SAMPL03e 
SAMPL039 
SAMPL040 
SAMPL041 
SAMPL042 
SAMPL043 
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hRRORl 
.ERRORZ 
.EKR0ft3 
.ERRaR4 



SAMPLR 
BtGIN 



MNOTfc Is'IMPROPEft NUMBER OF OPERANDS, NO STATEMENTS GENERATED* 

MEXIT 

MNOTE 1, 'OPERAND TYPES DIFFERENT, NO STATEMENTS GENERATED' 

MEXIT 

MNOTE 1, 'IMPROPER OPERAND TYPES, NO STATEMENTS GENERATED' 

MEXIT 

MNOTE 1, 'IMPROPER OPERAND LENGTHS, NO STATEMENTS GENERATED' 

MEND 

MAIN ROOTINE 



CSECT 

SAVE 

6ALR 

USING 

ST 

LM 



(14,12],,< 

R12,0 

*,RI2 

13,SAVE13 

R5,R7,=A{LISTAREA,16,LISTENDJ 



ESTABLISH ADDkESSAblLI TY OF PROGRAM 
AND TELL THE ASStMBLER WHAT BASE TO USE 



LOAD LIST AREA PARAMETERS 



REGISTER 5 POINTS TO THE LIST 
FIND LIST ENTRY IN TABLE 
CHECK TO SEE IF NAME HAS FOUND 
BRANCH IF NOT 
REGISTER 1 NOW POINTS TO TABLE ENTRY 

TShlTCH,LSWITCH MOVE FUNCTIONS 

TNUMBtR.LNUMBER FROM LIST ENTRY 

T ADDRESS, LADDRESS 

k5,R6,M0R£ LOOP THROUGH THE LIST 

T£STTABLI240),TABLAREA 

NOTRIGHT 

T£STLISI(96» ,LISTAREA 

NOTRIGHT 

'ASSEMBLER SAMPLE PROGRAM SUCCESSFUL' 

Ri3,SAVE13 



USING LIST,R5 

6AL R14, SEARCH 

TM SiWITCH.NONE 

BO NOTTHERE 

USING TABLE, Rl 

MOVE 

MOVE 

MOVE 

ttXLE 

CLC 

BNE 

CLC 

BNE 

WTO 

L 

RETURN (14,12»,RC=0 



TO TABLE ENTRY 



NOTRIGHT 

NOTTHERE 

SAVE13 
SWITCH 

NONE 



WTO 'ASSEMBLER SAMPLE PROGRAM UNSUCCESSFUL' 

B EXIT 

01 LSWITCH,NONE TURN ON SWITCH IN LIST ENTRY 

B USTLOOP GO BACK AND LOOP 

DC F • ' 

DC X'OO' 

EQU X'SO' 



BINARY SEARCH ROUTINE 



SEARCH 


NI 


SWITCH, 255-NONE TUR 




LH 


R].,R3,-F'128,4,128' 




LA 


Ri,TABLAREA-16(Rl) 


LOOP 


SRL 


R3,l 




CLC 


LNAME,TNAME 




BH 


HIGHER 




BCR 


e,R14 




SR 


R1,R3 




BCT 


R2,L00P 




B 


NOTFCUND 


HIGHER 


AR 


R1,R3 




BCT 


R2,L0OP 


NOTFOUNO 


01 


SWITCH, NONE 




BR 


R14 


♦ 






* 


THIS 


IS THE TABLE 




DS 


00 


TAbLAREA 


DC 


XL8'0',CL8'ALPHA' 




DC 


XLB'O' ,CL8'BETA' 




DC 


XL6'0',CL8'DELTA' 




DC 


XL8'0',CL8'EPSIL0N' 




DC 


XL8'0',CL8'ETA' 




DC 


XL8'0',CL8'GAMMA' 




DC 


XL8'0',CL8«ICTA' 




DC 


XL8'0',CL8'KAPPA' 




DC 


XL6'0',CL8'LAMBDA' 




i/C 


XL8'0',CL8'MU' 




DC 


XL8'0',CL8'NU' 




DC 


XL8'0',CL8'OMICRON' 




DC 


XLe'0',CL8«PHI' 




DC 


XL8'0',CL8'SIGMA' 




DC 


XL8'0',CL8«ZETA' 



TURN OFF NOT FOUND SWITCH 
LOAD TABLE PARAMETERS 
GET ADDRESS OF MIDDLE ENTRY 
DIVIDE INCREMENT BY 2 
COMPARE LIST ENTRY WITH TABLE ENTRY 
BRANCH IF SHOULD BE HIGHER IN TABLE 
EXIT IF FOUND 
OTHERWISE IT IS LOWER IN THE TABLE 

SO SUBTRACT INCREMENT 
LOOP 4 TIMES 

ARGUMENT IS NOT IN THE TABLE 
ADO INCREMENT 
LOOP 4 TIMES 

TURN ON NOT FOUND SWITCH 
EXIT 



SAMPL044 
SAMPL045 
SAMPL046 
SAMPL047 
SAMPL048 
SAMPL049 
SAMPL050 
SAMPL051 
SAMPL052 
SAMPL053 
SAMPL054 
SAMPL055 
SAMPL056 
SAMPL057 
SAMPL058 
SAMPL059 
SAMPL060 
SAMPL061 
SAM PL 06 2 
SAMPL063 
SAMPL064 
SAHPL065 
SAMPL066 
SAMPL067 
SAMPL068 
SAMPL069 
SAMPL070 
SAMPL071 
SAHPL072 
SAMPL073 
SAMPL074 
SAMPL075 
SAMPL076 
SAHPL077 
SAMPL078 
SAMPL079 
SAMPL080 
SAMPL081 
SAMPL082 
SAMPL083 
SAMPL084 
SAMPL085 
SAMPL086 
SAMPL087 
SAMPL088 
SAMPL089 
SAMPL090 
SAMPL091 
SAMPL092 
SAMPL093 
SAMPL094 
XSAMPL095 
SAMPL096 
SAMPL097 
SAMPL098 
SAMPL099 
SAMPLIOO 
SAMPLlOl 
SAMPL102 
SAMPL103 
SAMPLI04 
SAMPL105 
SAMPL106 
SAMPL107 
SAMPL108 
SAMPL109 
SAMPLllO 
SAMPLIU 
SAMPL112 
SAMPL113 
SAMPL114 
SAMPLllS 
SAMPL116 
SAMPL117 
SAMPL118 
SAMPL119 
SAMPL120 
SAMPL121 
bAMP. 122 



142 



* THIS IS THE LIST 
* 

LISTAREA DC CLS'LAMBDA' , X'OA' ,fL3'29' ,A( BEGIN) 

DC CL8'ZETA',X'05',FL3»5»,A(LOOP) 

DC CL8'THETA',X'02' ,FL3 ' 45* ,A( BEGIN) 

OC CLe'TAU',X'00',FL3«0',A<l) 

DC CL8'LIST',X'1F',FL3«465» ,A(0) 

LISTEND DC CL8' ALPHA* , X« 00« ,FL3' 1 ' ,A(123) 

* THIS IS THE CONTROL TABLE 



,X'00',A(123»,CL8'ALPHA« 
,CL8'BETA» 
,CL8'DELTA' 
,CL8'EPSIL0N' 
,CL8»ETA« 
tCL8'GAMMA» 
,CL8'I0TA' 
iCLB'KAPPA' 
FL3'29' tX'OA' ,A( BEGIN) ,CL8' LAMBDA' 
,CL8'MU' 
.CLB'NU* 
,CL8'CMICR0N' 
.CLB'PHP 
.CLB'SIGMA' 
,X'05',A(LOOP),CL8«ZETA' 

THIS IS THE CONTROL LIST 



OS 


OD 


TESTTABL DC 


FL3'1« 


DC 


XL8"0« 


DC 


XLB'O* 


DC 


XLB'O' 


DC 


XL8'0' 


DC 


XLB'O' 


DC 


XLB'O' 


DC 


XLB'O' 


DC 


FL3'29 


DC 


XLB'O' 


DC 


XLB'O' 


DC 


XLB'O' 


DC 


XLB'O' 


DC 


XLB'O' 


DC 


FL3'5' 



TESTLIST 



DC CLB'LAMBOA'.X'OA' ,FLjt' 29' ,A( BEGIN) 

DC CLB«ZETA«fX'O5',FL3«5',A<L0OP) 

DC CLB'THETA' ,X' B2« ,FL3'45' ,A( BEGIN) 

DC CL8'TAU«,X«80',FL3'0',A(1) 

DC CL8'LIST'iX'9F',FL3'465' ,A(0) 

DC CL8' ALPHA", X'00',FL3'1',A( 123) 

THESE ARE THE SYMBOLIC REGISTERS 



RO 


EQU 





Rl 


EQU 


1 


R2 


EQU 


2 


R3 


EQU 


3 


R5 


EQU 


5 


R6 


EQU 


6 


R7 


EQU 


7 


R12 


EQU 


12 


R13 


EQU 


13 


R14 


EQU 


14 


R15 


EQU 


15 



* THIS IS THE FORMAT DEFINITION OF LIST ENTRYS 
♦ 

LIST DSECT 

LNAME OS CLB 

LSWITCH DS C 

LNUMBfcR DS FL3 

LAODRESS OS F 
* 

* THIS IS THE FORMAT DEFINITION OF TABLE ENTRYS 



TABLE 


DSECT 




TNUMBER 


DS 


FL3 


TSWITCH 


OS 


C 


TAODRESS 


OS 


F 


TNAME 


DS 


CLB 




END 


BEGIN 



SAMPL123 
SAM(^L124 
SAMPL125 
SAMPL126 
$AMPL127 
SAMPH28 
SAMPL129 
SAMPH30 
SAMPL131 
SAMPL132 
SAMPL133 
SAMPL134 
SAMPL135 
SAMPL136 
SAHPL137 
SAMPL138 
SAMPL139 
SAMPL140 
SAMPL141 
SAMPL142 
SAMPL143 
SAMPL14A 
SAMPL145 
SAMPL146 
SAMPL147 
SAMPL148 
SAMPL149 
SAMPL150 
SAMPL151 
SAMPL152 
SAMPL153 
SAMPL154 
SAMPL155 
SAMPL156 
SAMPL157 
SAMPL158 
SAMPL159 
SAMPL160 
SAMPL161 
SAMPL162 
SAMPL163 
SAMPL164 
SAMPL165 
SAMPL166 
SAMPL167 
SAMPL168 
SAMPL169 
SAMPL170 
SAMPL171 
SAMPL172 
SAMPL173 
SAMPL174 
SAMPL175 
SAMPL176 
SAMPL177 
SAMPL178 
SAMPL179 
SAMPL180 
SAHPLIBI 
SAMPL1B2 
SAMPH83 
SAMPL184 
SAMPL1B5 
SAMPL186 
SAMPLI87 
SAMPL188 
SAMPLie9 
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APPENDIX I; ASSEMBLER LANGUAGES— FEATURES COMPARISON CHART 



Features not shown below are common to all assemblers. In the chart: 
Dash = Not allowed. 
X = As defined in Operating System/360 Assembler Language Manual. 



Feature 


Basic 

Programming 

Support/360: 

Basic 

Assembler 


7090/7094 
Support 
Package 
Assembler 


BPS 8K Tape, 
BOS 8K Disk 
Assemblers 


DOS/TOS 
Assembler 


OS/360 
Assembler 


No. of Continuation Cards/Statement 
(exclusive of macro-instructions) 








1 


1 


2 


Input Character Code 


EBCDIC 


BCD & EBCDIC 


EBCDIC 


EBCDIC 


EBCDIC 


ELEMENTS: 












Maximum Characters per symbol 


6 


6 


8 


8 


8 


Character self-defining terms 


1 Char, only 


X 


X 


X 


X 


Binary self-defining terms 






X 


X 


X 


Length attribute reference 






X 


X 


X 


Literals 






X 


X 


X 


Extended mnemonics 




X 


X 


X 


X 


Maximum Location Counter value 


2'6., 


224., 


224-1 


224-1 


224-1 


Multiple Control Sections per assembly 






X 


X 


X 


EXPRESSIONS: 












Operators 


+ _* 


+ -V 


+ -V 


+ -V 


+ -V 


Number of terms 


3 


16 


3 


16 


16 


Levels of parentheses 






1 


5 


5 


Complex relocatability 






X 


X 


X 


ASSEMBLER INSTRUCTIONS: 












DC and DS 












Expressions allowed as modifiere 








X 


X 


MuJtiple operands 








X2 


X 


Multiple constants in an operand 


- - 


- - 


Except 
Address 
Consts. 


X 


X 


Bit length specifications 








X2 


X 


Scale modifier 






X 


X 


X 


Exponent Modifier 






X 


X 


X 


DC types 


Except 
B, P, Z 
V, Y, S, L 


Except 
B, V, L 


Except L 


X2 


X 


DC duplication factor 


Except A 


X 


Except S 


X 


X 



Assembler F only 



2dOS 14K D Assembler only 



Appendix I: Assembler Languages' — Features Comparison Chart 145 



Feature 


Basic 

Programming 

Support/360: 

Basic 

Assembler 


7090/7094 
Support 
Package 
Assembler 


BPS 8K Tape, 
BOS 8K Disk 
Assemblers 


DOS/TOS 
Assembler 


OS/360 
Assembler 


DC duplication factor of zero 






Except S 


X 


X 


DC length modifier 


Except 
H, E, D 


X 


X 


X 


X 


DS types 


OnlyC, 
H, F, D 


Only C, 
H, F, D 


Except L 


X2 


X 


DS length modifer 


Only C 


OnlyC 


X 


X 


X 


DS maximum length modifier 


256 


256 


256 


65,535 


65,535 


DS constant subfield permitted 






X 


X 


X 


COPY 








X 


X 


CSECT 






X 


X 


X 


DSF.CT 


- 




X 


X 


X 


ISEQ 






X 


X 


X 


LTORG 






X 


X 


X 


PRINT 






X 


X 


X 


TITLE 




X 


X 


X 


X 


COM 








X 


X 


ICTL 


1 operand 
(1 or 25 
only) 


1 operand 


X 


X 


X 


USING 


2 operands 
(operand 1 
relocatable 
only) 


2-17 operands 
(operand 1 
relocatable 
only) 


6 operands 


X 


X 


DROP 


1 operand 
only 


X 


5 operands 


X 


X 


CCW 


operand 2 

(relocatable 

only) 


X 


X 


X 


X 


ORG 


no blank 
operand 


no blank 
operand 


X 


X 


X 


ENTRY 


1 operand 
only 


1 operand 
only 


1 operand 
only 


X 


X 


EXTRN 


1 operand 
only (max 14) 


1 operand 
only 


1 operand 
only 


X 


X 


WXTRN 


-- 


-- 


-- 


X2 


x' 


CNOP 


2 decimal 
digits 


2 decimal 
digits 


2 decimal 
digits 


X 


X 


PUNCH 


... 






X 


X 


REPRO 


... 


-- 


X 


X 


X 


Macro Instructions 


--■ 




X 


X 


X 


OPSYN 


-- 


-- 


-- 


-- 


x' 


EQU 


X 


X 


X 


X 


X 



'Assembler F only 

- DOS Assembler 14KD only 
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BPS 8K Tape, 


BOS 16K 


OS/360 
Assembler 


Macro Facility Features 


BOS 8K Disk 
Assemblers 


Disk/Tape 
Assembler 


Operand Sublists 




X 


X 


Attributes of macro-instruction operands inside macro definitions and symbols used in 


- - 


X 


X 


conditional assembly instructions outside macro definitions. 








Subscripted SET symbols 




X 


X 


Maximum number of operands 


49 


100^ 


200 


Conditionol assembly instructions outside macro definitions 




X 


X 


Maximum number of SET symbols 








global SETA 


16 


* 


* 


global SETB 


128 


* 


* 


global SETC 


16 


* 


* 


local SETA 


16 


* 


* 


local SETB 


128 


* 


* 


local SETC 





* 


* 


* The number of SET symbols permitted is variable, dependent upon available main storage. 






Note: The maximum size of a character expression is 127 characters for the DOS/TOS Assembler D and 




255 characters for the OS Assembler F. 







200 for Assembler F 
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APPENDIX J: sample MACRO DEFINITIONS 



The macro definitions in this appendix are 
typical applications of the macro language 
and conditional assembly. Another macro 
definition is included in the sample pro- 
gram as part of Appendix H. 



Notice the use of the inner macro in- 
struction (IHBERMAC) within SAVE for the 
purpose of generating MNOTE statements. 
Included with SAVE are some examples of the 
statements generated from it. 



MEMBER NAME SAVE 








MACRO 






00020000 


CNAME 


SAVE 


CREG.f.CnOt.CID 




00 040000 




LCLA 


CA.CB.tC 




00060000 




LCLC 


£F;,&F,r.G,SH 




00080000 




AIF 


( '(.REG* EQ " ).EI 




00100000 




AIF 


( 'tirj' ,.E(J ' M.NULLID 




00120000 




AIF 


(•tin* EQ ••M.SPECID 




00140000 


CA 


SETA 


( (K«CID+2)/2)»2+4 




00160000 


6NAME 


8 


£A.(0.15) 


JRANCH AROUND 10 


00180000 


&A 


SETA 


K'610 




00200000 




DC 


ALl(CA) 


LENGTH OF IDENTIFIER 


00220000 


.CONTB 


AIF 


(£A 5T 32).SPLITUP 




00240000 


•CONTAA 


AIF 


( CA GT 8),flRAKDWN 




00260000 


CE 


SETC 


«6ID' (tB+l,£A) 




00280000 




DC 


CLCA'tlE* 


IDENTIFIER 


00300000 




AGO 


.CONTA 




00320000 


.BRAKOWN 


ANOP 






00 340000 


CE 


SETC 


•&ID« (£H+l,8) 




00360000 




DC 


CL8'£E' 


IDENTIFIER 


00380000 


CB 


SETA 


£8 + 8 




00400000 


CA 


SETA 


CA-8 




00420000 




AGO 


.CONTAA 




00440000 


.SPLirUP 


ANOP 






00460000 


CE 


SETC 


•£I0' (£8+1,8) 




00480000 


CF 


SETC 


•CIO' (£9+9,8) 




00500000 


CG 


SETC 


•eiO« (£6+17,8) 




00520000 


CH 


SETC 


•£I0^(£B+25,8) 




00540000 




DC 


CL32^£E.£F.£G.£H« 


IDENTIFIER 


00560000 


CB 


SETA 


£8+32 




0C580000 


CA 


SETA 


£A-32 




00600000 




AGO 


.CONfB 




00620000 


.NULLIO 


ANOP 






00640000 


CNAME 


US 


OH 




00660000 




AGO 


.CONTA 




00680000 


.SPECIO 


AIF 


(•£NAME^ EQ '•). CSECTN 




00700000 


CE 


SETC 


•CNAME' 




00720000 


CA 


SETA 


1 




00740000 


.CONTQ 


AIF 


( •££• (1,£A) EO •£E' ). LEAVE 




00760000 


CA 


SETA 


£A+I 




00780000 




AGO 


.CONTQ 




00800000 


•LEAVE 


ANOP 






00820000 


CB 


SETA 


( (£A+2)/2)»2+4 




0U840000 


CNAME 


6 


£B. (0,15) 


BRANCH AROUND ID 


00860000 




DC 


AL1(£A) 




00880000 




DC 


CLCA'£E' 


IDENTIFIER 


00900000 




AGO 


.CONTA 




00920000 


.CSECTN 


AIF 


('£SYSECT' EQ ••J.EA 




00940000 


CE 


SETC 


•£SYS£CT' 




00 96 0000 


CA 


SETA 


I 




00980000" 




AGO 


•CONTQ 




01000000 


.E4 


IHBERMAC 78,360 


CSECT NAME NULL 


01020000 


.CONTA 


AIF 


(T'£REG(n NE 'N'j.ES 




01040000 




AIF 


(•£CODE' EQ •T'). CONTC 




OIO&OOOO 




AIF 


(•CCODE^ N£ •• ).E2 




01080000 


CA 


SETA 


£REG(l)»A+20 




01 100000 




AIF 


(£A LE 75). CONTD 




01120000 


CA 


SETA 


£A-6A 




01140000 


.CONTD 


AIF 


(N'£REG NE 2). CONTE 




01160000 




STM 


£REG(1),£REG(2),£A.(13) 


SAVE REGISTERS 


01180000 




MEXIT 






01200000 


.CONTE 


AIF 


(N'£REG NE 1).E3 




01220000 




ST 


£REG(1) ,£A.(13,0) 


SAVE REGISTER 


01240000 




MEXIT 






01260000 


•CONTC 


AIF 


(CREG( 1) GE 14 OR CREG( I) LE 


2).C0NTF 


01280000 




STM 


14,15,12(13) 


SAVE REGISTERS 


01300000 


CA 


SETA 


£REG( l)«4+20 




01320000 




AIF 


(N'CREG NE 2). CONTG 




01340000 




STM 


CREG(1),CREG(2),£A.( 13) 


SAVE REGISTERS 


01360000 




MEXIT 






01380000 


.CONTG 


AIF. 


(N'CREG NE 1).E3 




01400000 




ST 


EREG(1),£A.(13,0) 


SAVE REGISTER 


01420000 




MEXIT 






01440000 
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.E2 



(N'&REG NE 2) .CONTH 
14,6REG(2) ,12( 13) 



AiF 

STM 

MEXIT 

AIF 

STM 

MEXIT 

IHBERMAC 18,360 

MEXIT 

IHBERMAC 37,360,CC0DE 



(N'£REG NE I).E3 
14,&REG( 1) ,121 13) 



MEXIT 
.E3 IHBERMAC 36,360,£REG 
MEND 
KND OF DATA FOR SDS OR MEMBER 



SAVE REGISTERS 

SAVE REGISTERS 
REG PARAM ?«ISSING 
INVALID CODE SPECIFIED 
INVALID REGS. SPECIFIED 



Ol'tbOOOO 
01A80000 
01500000 
01 520000 
OlS'iOOOO 
01560000 
01580000 
01600000 
01 620000 
01640000 
01660000 
01680000 



SAMPLE SAVE MACRO INSTRUCTI0r4S 



FOGHORN SAVE ( 14,12) 
FOGHORN OS OH 

STM 14.12«12(I3> SAVE REGISTERS 



SAVE IRE614,REG12I,T 
DS OH 

12t»* IHB002 INVALID FIRST OPERAND SPECIFIED-(REG14.R 



SAVMACRO SAVE 114, 121. T.* 

SAVMACRO B 14(0.15) BRANCH AROUND ID 

OC AL1(8) 

OC CLS'SAVMACRO* IDENTIFIER 

STM 14,12,12(13) SAVE REGISTERS 



HflHBER NAME NOTE 



MACRO 

NOTE tOCB 

AIF (•tUCH- EQ 

IHBINNRA toco 

L 15,84(0,1) 

BALR 14,15 

MEXIT 

IHBERMAC 6 

MEND 



00020000 
00040000 
00 060000 
OOObOOOO 
LOAD -JOTE RTN ADDRESS 00100000 
LINK TO NOTE ROUTINF 00120000 
00140000 
00160000 
00130000 



rlltMBER NAME POINT 
MACRO 



POINT eOCB.flLOC 

AIF i *f.rx:B» EC •• )-ERRl 

Air i'fcLOC EO ").eRR2 

IHBINNRA EDCBttLQC 

I 15,84(0,1) 

rtAL 14,4(15,0) 

IHBERMAC 6 
MEXIT 

IHBERMAC 3 
MEND 



00020000 
00 040000 
00060000 
00080000 
00100000 
LOAD POINT RTN ADDRESS 00120000 
LINK rn POINT ROUTINE 00140000 
00160000 
00180000 
00200000 
00220000 
00240000 



MEMBER NAME CHECK 



MACRO 

CHECK 6DECB 

AIF ( 'EDECB' EQ 

SliaSNNRA tOECB 

L i-tjatO,!) 

L 15,52(0,14) 

BALR 14,15 

MEXIT 

IHBERMAC 07,018 

MEND 



PICK UP DC8 ADDRESS 
LOAD CHECK ROUT. APDR, 
LINK TO CHECK ROUTINE 



00020000 
00 040000 
00 060000 
00080000 
00 100000 
00120000 
00140000 
00 160000 
00180000 
00200000 



150 



INDEX 



Indexes to systems reference library manuals are consolidated in the publication OS Master Index t o Refe rence Manuals, Order No. GC28-6644. 
For additional information about any subject below, refer to other publications listed for the same subject in the Master Index. 



&SYS, restrictions on use 67,81,95 
&SYSECT (see current control section name) 
&SYSLIST (see macro instruction operand) 
&SYSNDX (see macro instruction index) 
7090/7094 Support Package Assembler 3,145 

Absolute expressions 17,29 
Absolute terms 10 
ACTR instruction 89 
Address constants 47-49 

A- type 47 

Complex relocatable expressions 4 7 

Literals not allowed 15 

Q-type 48 

S-type 48 

V-type 4 8 

Y-type 47 
Address specification 30 
Addressing 

Dummy sections 25 

Explicit 19 

External control sections 2 8 

Implied 19 

Relative 21 
AGO instruction 89 
AIF instruction 88 
Alignment, boundary 

CNOP instruction for 56 

Machine instruction 29 
Ampersands in 

Character expressions 83 

Macro instruction operands 71 

MNOTE instruction 94 

Symbolic parameters 67 

Variable symbols 62,140 
ANOP instruction 90 
Apostrophes 

Character expressions 84 

Macro instruction operands 71 

MNOTE instruction 94 
Arithmetic expressions 

Arithmetic relations 86 

Evaluation procedure 82 

Invalid examples 82 

Operand sublists 72 

Operators allowed 81 

Parenthesized terms 
evaluation 82 
examples 82 

SETA instruction 81 

SETB instruction 86 

Substring notation 84 

Terms allowed 81 

Valid examples 81 
Arithmetic relations 86 
Arithmetic variable 9 8 
Assembler instructions 

Statement 35,133 

Table 131 
Assembler language 

Basic Programming Support 9,145 

Comparison chart 145 

Macro language, relation to 61 

Statement format 8,9 

Structure 10,11 



Assembler program 

Basic functions 4 

Output 22 
Assembly, terminating an 58 
Assembly no operation (see ANOP 

instruction) 
Attributes 

How referred to 77 

Inner macro instruction operands 76 

Notations 76 

Operand sublists 76 

Outer macro instruction operands 76 

Summary chart 139 

Symbols 76 

Types 76 

Use 76 

(see also specific attributes) 

Basic Programming Support Assembler 3,145 
Base registers 

Address calculation 4,28,30 
DROP instructions 20 
Loading 20 
USING instructions 19 
Begin column 8,53,54 
Binary constant 43 
Binary self-defining term 13 
Binary variable 9 8 
Blanks 

Logical expressions 86 
Macro instruction operands 71 
CCW instruction 50 
Channel command word, defining 51 
Character codes 107 
Character constant 42 
Character expressions 
Ampersands 84 
Apostrophes 84 
Character relations 86 
Examples 84 
Periods 84 
SETB instructions 86 
SETC instructions 83 
Character relations 86 
Character self-defining term 13 
Character set 15,107 
Character variable 9 8 
CNOP instruction 56 
Coding form 7 

Columns (begin, continue, end) 8,53,54 
COM instruction 27 

Commas, macro instruction operands 7 2 
Go'mment Entry 9 
Comment statements 
Example 69 
Model statements 69 
Not generated 69 
Comparison chart 145 
Compatibility 

Assembler language 3 
Macro definitions 104 
Complex relocatable expressions 47 
Concatenation 

Character expressions 83,85 
Defined 68 



Index 151 



Examples 6 8 

Substring notations 85 
Conditional assembly elements, summary 

charts of 90,138 
Conditional assembly instructions 

How to write 75 

Summary 7 5 
Continue column 8,53,54 

Use 75 

(see also specific instructions) 
Conditional branch (see AIF instruction) 
Conditional branch instruction 32 

Operand format 33 
Constants (see also specific types) 

Defining (see DC instructions) 

Summary 135 
Continuation lines 7 
Control dictionary 22 

Control section location assignment 22 
Control sections 

Blank common 27 

CSECT instruction 23 

Defined 22 

First control section, properties of 23 

START instruction 23 

Unnamed 24 
COPY instruction 57 
COPY statements in macro definitions 

Format 70 

Model statements, contrasted 70 

Operand field 70 

Use 69 
Count attribute 

Defined 79 

Notation 79 

Operand sublists 79 

Use 78 

Variable symbols 79 
CSECT instruction 

Length attribute 23 

Symbols 2 3 
Current control section name (&SYSECT) 

Affected by CSECT, DSECT, START 99 

Example 100 

Use 99 
CXD instruction 26 

Data definition instructions 36 
Channel command words 50 
Constants 36 
Storage 4 8 
DC instruction 36 

Constant operand subfield 41 

Address constant (see Address 
constants) 

Binary constant 43 

Character constant 42 

Decimal constant 46 

Fixed-point constant 43 

Floating-point constant 44 

Hexadecimal constant 42 

Type codes for 38 
Exponent modifier 41 
Duplication factor operand subfield 38 



Length modifier 39 

Bit length specification 39 

Modifiers operand subfield 38 

Scale modifier 40 

Type operand subfield 38 
Decimal constants 46 

Length, maximum 46 

Length modifier 39 

Packed 46 

Zoned 46 
Decimal field, integer attribute of 80 
Decimal self-defining terms 12 
Defining constants (see DC instruction) 
Defining storage (see DC instruction, 

DS instruction) 
Defining symbols 12 

Dimension, subscripted SET symbols 97 
Displacements 29 
Double-shift instruction 29 
DROP instruction 20,29 
DS instruction 48-50 

Defining areas 50 

Forcing alignment 50 
DSECT instruction 24 

Dummy section location assignment 25 
Duplication factor 38 

Forcing alignment 50 
DXD instruction 26 

Effective address, length 30 

EJECT instruction 52 

End CO lumn 8,53,54 

END instruction 58,66 

ENTRY instruction 27,28 

Entry point symbol, identification of 28 

EQU instruction 35 

Equal signs, as macro instruction operands 

71 
Error message (see MNOTE instruction) 
Error messages after END statement 58 
Explicit addressing 19,30 

Length 30 
Exponent modifiers 41 
Expressions 16 

Absolute 17 

Evaluation 16 

Relocatable 17 

Summary chart 13 8 
Extended mnemonic codes 32 

Operand format 33 
External control section, addressing of 28.1 
External dummy sections 26 
External symbol, identification 28 
EXTRN instruction 27,28 

First control section 23 
Fixed-point constants 44 

Format 43 

Positioning 44 

Scaling 44 

Values, minimum and maximum 44 
Fixed-point field, integer attribute of 78 
Floating-point constant 44 

Alignment 45 



152 



Format 45 

Scale modifiers 45 
Floating-point field, integer attribute 

of 78 
Format control, input 53 

GBLA instruction 9 5 
GBLB instruction 95 
GBLC instruction 95 
General register zero, base register 

usage 20 
Generated statements, examples of 6 8 
Global SET symbols 63 

Defining 95 
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Literals 14 
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RS machine instruction 
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Format 32,119 
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RX machine instruction 
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S machine instruction 
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Symbols 78 
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SET variable 9 4 
SETA instruction 

Examples 81-83 

Format 81 

Operand field 

Evaluation procedure 81,82 
Operators allowed 81 
Parenthesized terms 82 
Terms allowed 81 
Valid examples 82 

Operand sublist 82 
Examples 82 
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